Fonction Eval de VBA

Fermé

Zic0 - 10 août 2001 à 09:39
Coun05 - 6 févr. 2008 à 13:47

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 ?

A voir également:

Fonction Eval de VBA
Fonction si et - Guide
Fonction moyenne excel - Guide
Vba ouvrir un fichier excel avec chemin ✓ - Forum VB / VBA
Fonction somme excel - Guide
Fonction filtre excel n'existe pas - Forum Excel

3 réponses

Réponse 1 / 3

MaisOui
10 mars 2005 à 13:37

salut,

essaie avec la fonction me().

exemple : me("NomTypeControl" & I)

Réponse 2 / 3

MaisOui
10 mars 2005 à 13:39

salut,

essaie avec la fonction me().

exemple : me("NomTypeControl" & I)

Réponse 3 / 3

Coun05
6 févr. 2008 à 13:47

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

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

Méthode find dans VBA - Recherche de données sous Excel

Erreur d'exécution 13 Incompatibilité de type

VBA : Range avec références variables..

VBA erreur 1004

Discussions similaires

Newsletters