incrementer un nb dans une textbox ?

[B52]

Bonsoir à tous, voici mon souci:

j'aimerais losrque mon userform1 s'affiche, que la valeur de la textbox1 soit egale à la valeur de la cellule A3 + 1 de la feuille "toto", sachant que cette valeur est de la forme suivante: 2004-125, donc je voudrais que cette textbox1 me propose 2004-126 lorsque mon userform1 s'ouvre, etc...
Par avance merci.

Stéphane

 

[omicron]

Bonsoir Stéphane,

Pour faire ce que tu souhaites, il suffit de coder les deux instructions qui suivent dans l'évènement "UserForm_Initialize" de ton UserForm

====================================================
Private Sub UserForm_Initialize()
TextBox1 = Replace(Range("A3"), "-", "") + 1
TextBox1 = Left(TextBox1, 4) & "-" & Right(TextBox1, Len(TextBox1) - 4)
End Sub
====================================================

@ Plus

Omicron.

 

[B52]

Salut Omicron et merci pour ta réponse.
Je m'excuse de ne pas avoir répondu avant mais j'ai pu me rendre sur le forum avant se soir...
J'ai essayé ta macro, mais ça ne marche pas, je pense que je m'y prends mal (ou dois-je mettre le nom de la feuille ou se trouve la valeur ), pourrais-tu me donner un peu plus d"explications STP. Merci

Stéphane

 

[omicron]

Bonsoir Stéphane,

Pourrais-tu envoyer en pièce jointe, le fichier Excel qui contient le problème à résoudre.

Merci et à bientôt.

Omicron