Numéro de facture automatique

tito023 Messages postés 2 Statut Membre -  
tito023 Messages postés 2 Statut Membre -
Bonsoir,
J'ai un fichier pour créer des devis,j'aimerais que mon numéro de devis change de +1 que seulement à l'enregistrement sous.
j'ai actuellement une macro mais le numéro change que à l'enregistrement, ce qui ne me convient pas.
ci dessous ma macro actuelle

Private Sub Workbook_BeforeSave(ByVal SaveAsUi As Boolean, Cancel As Boolean)
Range("no_facture").Value = Range("no_facture").Value + 1
End Sub

Merci d'avance pour votre aide
A voir également:

1 réponse

ccm81 Messages postés 11033 Statut Membre 2 433
 
Bonjour

Essaies ceci
If SaveAsUI Then Range("no_facture").Value = Range("no_facture").Value + 1 


Cdlmnt
2
tito023 Messages postés 2 Statut Membre
 
Bonsoir
super ca fonctionne

grand MERCI ☺
0