Incrementation

Résolu
diddy0 Messages postés 2 Statut Membre -  
diddy0 Messages postés 2 Statut Membre -
Bonjour,
J'aimerais trouver la macro pour " incrémenter le n° facture + 1 en l'ouvrant puis fermeture et ouvrir avec n° en + !
Merci infiniment !
diddy0

2 réponses

Mike-31 Messages postés 19571 Statut Contributeur 5 136
 
Bonsoir,

Il faut ouvrir le VBA soit en faisant Alt et touche F11 ou clic droit sur l'onglet de feuille et Visualiser le code, ouvrir la Thiswokbook et coller une de ces code pour incrémenter le numéro en B2

Private Sub Workbook_Open()
Range("B2") = Range("B2") + 1
End Sub

ou
Private Sub Workbook_Open()
[B2] = [B2] + 1
End Sub

mais il ne faudra pas oublier d'enregistrer le fichier en le fermant ou inclure l'enregistrement automatique à la fermeture du fichier

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub
A+
Mike-31

Pas savoir n'est pas un échec, l'échec est le refus d'apprendre.
0
diddy0 Messages postés 2 Statut Membre
 
Un tout grand merci à Mike-31
J'essayerai demain.
diddyo
0