N° de référence automatiqueRésolu

Question

Bonjour à toutes et à tous,

Tout d'abord, je tien à vous remercier pour l'aide plus que précieuse que fournie ce site.
Voici une semaine que je me suis lancer dans la programmation en VBA sous Excel, et je doit dire que je lute beaucoup.
Grace au info de votre site j'ai pu débuter mon projet, mais là je blo que sur une chose qui pourtant me parrait simple (et ça me rend dingue), voici mon probleme:

je souhaite qu'un textbox attribu un n° de référence à l'ouverture du userform et que ce n° soit incrémenté de 1 à chaque fois. De plus il faut que ce n° soit de la forme "A7-XXX".

Voila, j'espère avoir été assez claire, et vous remerci d'avance pour votre aide.

Qui fait l'ange, fait la bête!

mortalino · Accepted Answer

Salut, pour l'exemple, j'utilise la cellule A1 de la feuille 3, j'y place le nombre 1 et voici un exemple de UserForm : Private Sub CommandButton1_Click() Sheets(3).Range("A1").Value = Sheets(3).Range("A1").Value + 1 Me.Caption = "A7-" & Format(Sheets(3).Range("A1").Value, "000") End Sub Private Sub UserForm_Initialize() Me.Caption = "A7-" & Format(Sheets(3).Range("A1").Value, "000") End Sub ~ Mortalino ~ Colorisation automatique @++

--Mortalino-- Le mystérieux chevalier, ~Provençal, le Gaulois~

Sdbswiss · Answer

Merci Mortalino, c'est exactement ce que je cherchais.
Je ne connaisais pas la saisie : Format(XXX,XX) et je pen,se que cela poura m'aider pour la suite.

Encore une fois merci pour tout.

N° de référence automatique

2 réponses

Votre réponse

Discussions similaires