Fonction Eval de VBA

Zic0 -  
 Coun05 -
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 ?

3 réponses

  1. MaisOui
     
    salut,

    essaie avec la fonction me().

    exemple : me("NomTypeControl" & I)
    0
  2. MaisOui
     
    salut,

    essaie avec la fonction me().

    exemple : me("NomTypeControl" & I)
    0
  3. Coun05
     
    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
    0