Discussion :

[thiblight]

Bonjour,

Dans mon formulaire, j'ai créé 9 étiquettes nommées etiq1, etiq2, ..., etiq9 dont le contenu est le resultat de la requête "Tirer_une_consonne".

J'ai voulu créer une boucle du style

for i=1 to 9
rs.Open "Tirer_une_consonne", CurrentProject.Connection, adOpenKeyset, adLockPessimistic
Me.etiq"i".Caption = rs("Consonne")
next i

Mais VBA ne comprend pas Me.etiq"i".Caption
Quelle est la syntaxe correcte svp ?


PS : j'ai fait la methode bourrin pour l'instant, et qui marche mais bon ...

If i = 1 Then
rs.Open "Tirer_une_consonne", CurrentProject.Connection, adOpenKeyset, adLockPessimistic
Me.etiq1.Caption = rs("Consonne")
End If

If i = 2 Then
rs.Open "Tirer_une_consonne", CurrentProject.Connection, adOpenKeyset, adLockPessimistic
Me.etiq2.Caption = rs("Consonne")
End If

...

[mout1234]

Code :

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

Me("etiq" & i).Caption

[thiblight]

ok ca marche bien, merci