Boucle dans vba pour changer le caption des labels

[TopNotch63]

Bonjour,

j'ai chercher mais je ne réussi pas à trouver exactement ce que je cherche.

J'ai un userform avec plusieurs labels qui se nomment label1, label2, label3 ...

Est-il possible de changer les "captions" de ces labels en utilisant une boucle for next?

Je ne veux pas utiliser "controls" car les labels visés ne se suivent pas.

Voici ce que j'essai et qui ne fonctionne pas



for Z = 1 to 100

userform1.label(Z).caption= worksheets(1).cells(Z,1). value

next

Merci.

 

[laetitia90]

Re : Boucle dans vba pour changer le caption des labels

bonjour TopNotch63 🙂
et si tu mettais un fichier exemple ???

salut Lone🙂

 

[Lone-wolf]

Re : Boucle dans vba pour changer le caption des labels

Bonjour TopNotch63

le fichier exemple s'il te plaît, pour que l'on puisse faire le nécessaire et en .xlsm.


EDIT: Bonjour Cherie, Cherie 😉


EDIT2 : Moi je n'ai pas cherché mais j'ai réussi à trouver exactement ce que je cherchais. 😉




A+ 😎

 

[TopNotch63]

Re : Boucle dans vba pour changer le caption des labels

Excusez, voilà j'ai joint un exemple de ce que je voudrais.

Merci.

 

[laetitia90]

Re : Boucle dans vba pour changer le caption des labels

re🙂

essai comme cela??

Sub Macro1()
 Dim z As Byte
 For z = 1 To 10
 UserForm1.Controls("Label" & z) = Feuil1.Cells(z, 1)
 Next
 UserForm1.Show
End Sub

 

[TopNotch63]

Re : Boucle dans vba pour changer le caption des labels

C'est exactement ce que je chercais, merci beaucoup.😱