Incrémentation

[sebbb]

Re-bonjour tout le monde!!!

Peut-être qu'avec la pièce jointe ce sera plus compréhensible;
Voilà, ce que j'aimerai, c'est que quand j'appuie sur le bouton du userform, simu1 s'incrémente pour devenir simu2 et ainsi de suite à chaque clic.

Merci de m'éclairer.
Sébbb

 

[GClaire]

Sébbb, le forum

Si j'ai bien compris.

Remplace ton code par celui-là :

Option Explicit
Dim i
Private Sub CommandButton1_Click()
i = i + 1
TextBox1.Text = "Simu" & i
End Sub

Private Sub TextBox1_Change()

End Sub

Private Sub UserForm_Initialize()

i = 1
TextBox1.Text = "Simu" & i

End Sub

Salut, G'Claire

 

[sebbb]

Salut G'Claire,
Je te remercie infiniment, sans toi, je crois que je n'y serais jamis arrivé.

Bonne journée.

A+
Sébbb