Discussion :

[ddanie]

Bonjour,

Comment écrire un système de boucles pour ne pas à avoir 70 lignes à écrire en changeant uniquement le Label à chaque ligne de code (Label1, Label2, Label3, ... Label70)
J'ai essayé en concaténant Label & i, (ci-dessous) mais ça ne fonctionne pas.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
With UserForm1
   For i = 1 To 70
        .Label&i.BackColor = RGB(255, 255, 255)
   Next i
End With

Merci pour vos réponses

[Jean-Pierre49]

Bonjour

dans ce cas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Controls("Label " & i).BackColor = RGB(255, 255, 255)

Bon courage

[ddanie]

OK Ca fonctionne, juste une petite remarque, j'ai dû supprimer l'espace entre la fin de Label et le guillemet
Merci Jean Pierre
Bonne journée

[Jean-Pierre49]

Exact ddanie

Je l'ai écrie à la volée

J’aurais du faire attention