Selection userform avec une variable

Bonjour a tous,

J'aurais une petite question, je voudrais insérer un gif dans une fonction qui a graphe en paramètre.
Le gif à insérer doit être dans Userform.graphe.picture cependant si je rentre graphe4 en paramètre, cela doit alors devenir : Userform.graphe4.picture

Comment dire que

Code:

---

Userform.graphe4.picture

---

ici a la place de graphe4 avoir une variable de type string?

merci
Bastien

je ne sais pas mais je peux te mètre sur la piste de la solution.

tu peux créé des variable de tipe autre que string ou integer ...

tu peux dire :

Code:

---

dim variable as UserForm

---

il faut que tu arrive à créé une variable de type graphe et à l'exploiter.

Merci gourmand pour ton aide.

Cela veut dire en gros que:

Je devrai donc passer mon Image userform en paramètre c'est bien cela?

Pas évident je pensais qu'il y aurait plus simple une syntaxe qui dit par exemple "graphe4" qui est un string peut comme meme servir de selection dans

Code:

---

1 2 3 4

dim graphe as string graphe = "graphe4"   IHM.graphe.Picture

---

=> ERREUR

qui donnerai IHM.graphe4.Picture

en gros c'est passer du dessus qui pose une erreur au dessous.

le problème (à mon avis) est qu'excel n'attend pas un string pour graphe

Code:

---

IHM.graphe.Picture

---

je vais cherché aussi (je viens de rencontré le problème)

Bonjour.

Si tu veux adresser un contrôle de formulaire dont le nom est dans une variable, tu peux faire

Code:

---

monUserForm.Controls("NomDuControle")...

---

Cordialement,

PGZ

jais tester avec : (et sa marche)

Code:

---

1 2 3 4

Dim i As Byte For i = 1 To 5 Me.Controls("TextBox" & i) = "text essais" Next i

---

le problème est que sa ne marche pas avec un nom modifier :

Code:

---

1 2 3 4 5 6 7

Dim i As Byte Dim j As Byte For i = 1 To 5 For j = 1 To 5 Me.Controls("A" & i & "B" & j) = "text essais" Next j Next i

---

de plus je voudrai mètre cette fonction dans un module et je ne sais pas par quoi remplacer le "Me"

Bonjour.

Citation:

---

le problème est que sa ne marche pas avec un nom modifier :

---

Si tu as des contrôles qui s'appelle AiBj, pour tout i de 1 à 5 et tout j de 1 à 5, cela devrait marcher.

Mais attention : les noms de contrôles ne supportent pas les fautes d'orthographe, et cela n'a pas l'air d'être ton point fort! :rire:

Citation:

---

de plus je voudrai mètre cette fonction dans un module et je ne sais pas par quoi remplacer le "Me"

---

Ton code est déjà dans un module, celui du formulaire j'imagine.

Dans un module standard, tu remplaces l'instance Me par le nom du formulaire.

Cordialement,

PGZ

Merci a tous pour votre aide.

pgz si je fais cela sa devrai aller? (j'ai pas de excel ici)

Code:

---

1 2 3 4

Sub affichergif (graphe as String)   IHM.Controls(graphe).Picture = LoadPicture(Img)

---

Bon sa a l'air de marcher sur un truc fais à la va vite donc a confirmer mais vous pouvez l'utiliser le code m'a l'air bon :ccool:


Merci PGZ

Je résous une fois confirmer ;)

Bastien

Bonsoir.

Oui, cela doit marcher.

Amitiés,

PGZ