incrementer n° Merci à vous

[gilles]

Bonjour à tous.

Je desire faire apparaitre dans le label27 du userform2 le dernier n° saisi (de la feuille1 ,colonne A), et dans le textbox1 du userform2, faire aparaitre le prochain n°.
J'espère etre clair.

Merci

 

[gilles]

avec le fichier joint ,c'est mieux

 

[michel]

bonsoir Gilles

la macro ci dessous est à placer dans le UserForm2

si j'ai bien compris ta demande :
lors de l'affichage de l'USF , la macro recupere la valeur de la derniere ligne dans la colonne A . la valeur est integree dans le Label27 . le textbox1 est incrémenté d'une unité


Private Sub UserForm_Initialize()
'à placer dans UserForm2
Dim Valeur As Integer
'recupere la valeur de la derniere ligne dans la colonne A
Valeur = Sheets("Feuil1").Range("A" & Range("A65536").End(xlUp).Row)
Label27 = Valeur
TextBox1 = Valeur + 1
End Sub


bonne soiree
michel

 

[gilles]

BOnjour, vu l'heure.

Merci pour ta réponse Michel mais j'apporte une petite précision.
L'useform2 ne se trouve pas sur la feuille1 d'excel.
L'userform2 est appelé par un CommandButton4 de l'userform1.
Lors de l'affichage de l'userform2, je voudrais qu'une macro aille récuperer la dernière valeur (n°) de la colonne A de la feuille1, cette valeur sera intégrée dans le label27 du userform2. Le textbox1 (du userform2)sera incrémenté d'une unité.

Merci à vous tous pour votre aide

 

[michel]

bonjour Gilles

je ne comprends pas bien ta remarque : pour moi la macro répond parfaitement à ta demande , à moins que je n'ai pas compris ce que tu cherches à faire ....

ci joint un exemple


bon dimanche
michel

 

[gilles]

Bonjour Michel , le forum
J'ai bien suivi ta démarche, mais cela ne fonctionne toujours pas.
Ce n'est pas possible,Je dois faire toujours la même erreur
Joint le fichier pour que tu puisses y regarder de plus prêt.
Merci encore pour l'aide apporter et grâce à vous, le forum ,sans oublié thierry, j'ai appris énormement

Merci

 

[michel]

bonjour Gilles

je n'arrive pas à recuperer ton fichier...


bonne soiree
michel

 

[gilles]

Bonjour michel,le forum
Re-tentative pour la pièce jointe.
Bonne journée