Fonction Eval de VBA Fermé

Question

Sous Access 97, j'ai un formulaire dans lequel se trouve des controles qui ont des nom du style NomTypeControl0, NomTypeControl1 , NomTypeControl2 ...
Je voudrais trouver un moyen de les parcourir dynamiquement avec un truc du genre :
For I
Eval("NomTypeControl" & I)

Comment faire ?

MaisOui · Answer

salut,essaie avec la fonction me().exemple : me("NomTypeControl" & I)

MaisOui · Answer

salut,essaie avec la fonction me().exemple : me("NomTypeControl" & I)

Coun05 · Answer

Bonjour,

Merci beaucoup MaisOui, tu as répondu à une question dont je cherchais depuis longtemps la reponse. J'ai cherché du coté de la fonction eval ou evaluate pour interpréter une chaine de caractères comme une instruction (sans succes pour mon cas : VBA pour CATIA V5).

Meme problème à la base, je voulais choisir une image parmis 10 images affichées dans ma userform. 
Mes images s'appellent toutes "Img01", "Img02", ...  Je cherchais donc quelque chose pour remplacer les : 
MyUserform.MyPict.Picture = UserformListImages.Img01.Picture
MyUserform.MyPict.Picture = UserformListImages.Img02.Picture
...

solution donc :
MyVar="01"
MyUserform.MyPict.Picture = UserformListImages("Img" & MyVar).Picture


;)
Coun05

Fonction Eval de VBA

3 réponses

Discussions similaires