je cherche à renomer label et check box d'un useform.... et une boucle aurait été sympa. plustot que de faire 25 fois le même copié colé...
Code:
Dim I As Variant
Gestion.Label1.Caption = Worksheets('login').Cells(I, 1)
I = I + 1
Gestion.Label2.Caption = Worksheets('login').Cells(I, 1)
I = I + 1
j'ai essayer de faire une bcoule comme ceci mais bon ...il me manque des élement je pense
si je pouvais apprendre la technique pour travailler avec les objets ca m'arrangerai beaucoup :woohoo:
Code:
Dim I As Variant
For I = 1 to 25
Gestion.Label(I).Caption = worksheets('login').Cells(I, 1)
Next I
Le code est correct si ton Userform s'apelle Gestion. C'est si il s'appellait différemment que ça planterait. Par contre dans ton premier post tu ne parlais que de Labels et pas de CheckBoxes ??? Il faut aussi bien sûr qu'il existe autant de label que la boucle : Label1, Label2, ..., Label25. Sinon ça plante.
Bref, ton fichier en pièce jointe serait le bienvenu pour pouvoir continuer à t'aider.