Discussion :

[DragonBallZ1981]

Bonjour a tous,

Je rencontre un problème pour simplifié la récupération d'une image d'un userform vers un autre

Exemple
dans userform1 j'ai plusieurs images appelé toute différemment pour l'exemple on vas dire Image1, Image2 etc...
Dans userform2 j'ai également la même chose que l'userform1

Je voudrai dans l'userform3 pouvoir récuperer en variable l'image ui a été choisis par des boutons (l'emplacement de l'image est déjà créer et s'appel "Photo_profil")

mes variable sont déclarer en string (j'ai essayer variant, object mais sans succes)

Variable1 = userform (userform1 ou 2 selon mes choix de clic)
Variable2 = image (Image1, 2, 3 etc... selon le choix du clic)

Ensuite dans mon userform3 récuperer l'image qui a été choisis
Donc depuis l'userform3
Me.Photo_profil.Picture = userform1.Image1.Picture (ce code fonctionne bien mais l'userform ainsi que l'image sont entrée directement)

Si je remplace par les variables
Me.Photo_profil.Picture = Variable1.Variable2.Picture (ce code plante direct a l'ouverture de la sub)

Afin d'eviter des if, elseif etc... pour trouver la bonne image du bon userform j'aurai voulu simplifier par une seule ligne avec les variables
Est-ce possible ??

Merci de votre aide

[Franc]

Salut, essaie comme ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.Photo_profil.Picture = UserForms(Variable1).Controls(Variable2).Picture

[DragonBallZ1981]

Bonjour Franc,

Merci pour votre réponse, malheureusement ca ne fonctionne pas.

La sub ne plante plus a l'ouverture mais quand j'arrive sur la ligne j'ai un débeugage avec le message d'erreur
Erreur d'execution 13 incompatibilité de type

Pour rappel les variables sont déclaré en string, est-ce que la déclaration est bonne ??