Bonjour Jeny, Valérie, le Forum
Et bien alors si c'est à l'enregistrement que tu veux l'incrémentation de ton numéro, il y a une Procédure Evènementielle qui devrait t'aller comme un gant !
Dans le Private Module du Classeur "ThisWorkBook" : (Ni un
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim numero As Integer
numero = Val(Feuil3.TextBox1.Text)
numero = numero + 1
Feuil3.TextBox1.Text = numero
End Sub
Bon Appétit
@+Thierry