Boucle dans vba pour changer le caption des labels

TopNotch63 · 22 Mars 2016

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 · 22 Mars 2016

Re : Boucle dans vba pour changer le caption des labels

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

salut Lone

Lone-wolf · 22 Mars 2016

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 · 22 Mars 2016

Re : Boucle dans vba pour changer le caption des labels

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

Merci.

laetitia90 · 22 Mars 2016

Re : Boucle dans vba pour changer le caption des labels

re

essai comme cela??

Code:

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 · 22 Mars 2016

Re : Boucle dans vba pour changer le caption des labels

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

Boucle dans vba pour changer le caption des labels

TopNotch63

XLDnaute Nouveau

laetitia90

XLDnaute Barbatruc

Lone-wolf

XLDnaute Barbatruc

TopNotch63

XLDnaute Nouveau

Pièces jointes

laetitia90

XLDnaute Barbatruc

TopNotch63

XLDnaute Nouveau

Discussions similaires