Mettre une variable dans le nom d'un module pour l'appeler
Bonjour à tous,
Je vais essayer d'expliquer de façon claire ce problème :
Pour faire simple, sous Excel 2007 dans un Userform (appelé "essai") j'ai deux images nommées Image1 et Image2.
Je souhaite télécharger un fichier dans ces cases images en fonction de la valeur que prend une variable.
Le principe est le suivant : si i=1 je télécharge mon fichier dans Image1 si i = 2, dans Image2.
Le code suivant pour télécharger mon fichier dans Image1 fonctionne :
Code:
1
2
3
| sub appel
essai.Image1.Picture = LoadPicture("emplacement")
end sub |
Avec emplacement le chemin de mon fichier.
Je rappelle que "essai" est le nom de l'Userform qui contient Image1 et Image2.
Par contre, dès que le nom n'est plus explicite et dépend d'une variable, type :
Code:
1
2
3
4
5
| sub appel
dim i as integer
i=1
essai.image & i &.Picture = LoadPicture("emplacement")
end sub |
Une erreur de compilation apparaît : je pense que vba ne reconnait pas Image & i comme Image1.
Je n'ai aucune idée de la syntaxe pour faire ça. J'ai essayé plusieurs méthodes différentes, rien ne fonctionne. Savez-vous si ce type d'opération est possible ou comment la rendre possible ?
Merci à vous, bonne journée !
