OVH Cloud OVH Cloud

Facturation sur excel

3 réponses
Avatar
Madeleine Boulianne
Existe-t-il un moyen d'effectuer avec un macro la numération de facture
(incrémentée) sur excel.
Si quelqu'un peut m'aider, j'apprécirais beaucoup

3 réponses

Avatar
Nicolas B.
Salut,

Un exemple tout fait sur Excelabo :

http://www.excelabo.net/moteurs/compteclic.php?nomü-factures


A+
Nicolas B.

Existe-t-il un moyen d'effectuer avec un macro la numération de facture
(incrémentée) sur excel.
Si quelqu'un peut m'aider, j'apprécirais beaucoup


Avatar
JB
Bonsoir,

http://cjoint.com/?hywZxzFhfW

-Le compteur se trouve dans un onglet Compteur: 2006-04-007

-La macro affecte un numéro à la sauvegarde et incrémente le
compteur de 1
-Le compteur est remis à 1 chaque mois
-Le classeur est enregistré avec le nom Facturexxxx
-Le bouton est caché après exécution pour que la macro ne puisse pas
être exécutée 2 fois

Private Sub b_sauve_Click()
compteur = Sheets("compteur").Range("a1")
If Val(Mid(compteur, 6, 2)) = Month(Date) Then
Sheets("compteur").Range("a1") = Left(compteur, 8) &
Format(Val(Right(compteur, 3)) + 1, "000")
Else
Sheets("compteur").Range("a1") = Left(compteur, 5) &
Format(Month(Date), "00") & "-001"
End If
ActiveWorkbook.Save ' sauvegarde modèle
Me.b_sauve.Visible = False
Range("E1") = Sheets("compteur").Range("a1")
Range("E1").Interior.ColorIndex = 4
ActiveWorkbook.SaveAs Filename:="Facture" &
Sheets("compteur").Range("a1")
End Sub

Cordialement JB

Existe-t-il un moyen d'effectuer avec un macro la numération de facture
(incrémentée) sur excel.
Si quelqu'un peut m'aider, j'apprécirais beaucoup


Avatar
Clément Marcotte
http://dj.joss.free.fr/faq.htm#numFacture


"Madeleine Boulianne" a écrit dans le
message de news: %G9xg.85333$
Existe-t-il un moyen d'effectuer avec un macro la numération de facture
(incrémentée) sur excel.
Si quelqu'un peut m'aider, j'apprécirais beaucoup