Incrementation

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.

Un tout grand merci à Mike-31
J'essayerai demain.
diddyo