Affichage des label dans une boucle

Bonjour la communauté,

j'ai une petite question dans une de mes macros j'affiche plein de label dans une userform a partir d'un tableau mon tableau va s'agrandir considérablement et j'aimerai savoir si c'est possible d'afficher mes label avec une boucle for.

actuellement j'ai:

'affichage des données

EMP0.caption= tab_emp(0,0)

EMP1.caption= tab_emp(1,0)

EMP2.caption= tab_emp(2,0)

EMP3.caption= tab_emp(3,0)

EMP4.caption= tab_emp(4,0)

EMP_P0.caption= tab_emp(0,1)

EMP_P1.caption= tab_emp(1,1)

EMP_P2.caption= tab_emp(2,1)

EMP_P3.caption= tab_emp(3,1)

EMP_P4.caption= tab_emp(4,1)

le truc c'est que je vais avoir un tableau " tab_emp(20,4)"

dès que je fais une boucle for ça bug sur les labels

for i=0 to 20

("EMP" & i).caption = tab_emp (i,0)

qui peux me dire ce qui peux marcher.

merci a vous

Bonjour toutes et tous

'déclaration de la variable i

' Option Explicit  ' au debut
Dim i as Integer  '( ou Dim i$ )

For i = 1 To 21 
Me.Controls("Label" & i).Caption = tableau(i - 1) 
Next i 

à tester

crdlt,

André

ça fonctionne merci beaucoup

Alio

Rechercher des sujets similaires à "affichage label boucle"