Bonjour,

Je suis face à un problème que j'avais réussi a résoudre il y a quelques temps mais dont j'ai oublié la solution avec le temps. Malgré de très nombreuses recherches il m'est impossible de retrouver la solution...

Pour modifier rapidement le borderstyle de plusieurs dizaines de label, il y a ce code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
        For NB = 0 To 9
                Controls("CARRE_LBH_C" & NB & "L").BorderStyle = BorderStyle.Fixed3D
        Next
Or BorderStyle ne fait pas partie de Controls. Pour ce faire il faut lui dire que le fameux controls est un label.
Mais je ne me souviens plus de l'écriture précise, je sais juste que c'est un truc du genre:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
 
Controls(label,"CARRE_LBH_C" & NB & "L").BorderStyle = BorderStyle.Fixed3D
'ou
Controls.label("CARRE_LBH_C" & NB & "L").BorderStyle = BorderStyle.Fixed3D
Voila, merci d'avance pour votre aide ;-)