Discussion :

[fxleo]

aujourd'hui c'est le grand jour des questions.
J'ai un soucis d'appel.
Je stocke le nom d'un userform (userform.name) dans une variable (userf) de type string et je souhaite ensuite pouvoir ajouter un contrôle dynamiquement sur ce userform

Code :

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

1
2
Dim bouton As Control
            Set bouton = userf.Controls.Add("Forms.CommandButton.1", "Bt", True)

bien entendu cela plante mais je ne vois pas pourquoi.

merci par avance

[jfontaine]

Bonjour,

Une variable de type string ne devient pas un objet userform parceque tu lui as donnée, en valeur, le nom de la userform.

Code :

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

1
2
3
4
Dim userf As New UserForm1
Dim bouton As Control
 
Set bouton = userf.Controls.Add("Forms.CommandButton.1", "Bt", True)

[fxleo]

ok je suis d'accord, mais comment est ce que je peux faire ?

[jfontaine]

Pourquoi as tu besoin de gérer la userform via une variable string?

[fxleo]

En quelques mots je veux créer une petite appli pour concevoir des maquettes d'ihm.
Sur une feuille je construit via des cadres représentant mes ihm toute la navigation.
Ces cadres sont créés dynamiquement et je leur associe un userform créé aussi dyamiquement.
J'appelle depuis un cadre un userfom pour l'afficher ainsi qu'un autre userform qui contient une liste de contrôle ( comme la boite à outil) En cliquant sur un de ces contrôles j'ajoute automatiquement un contrôle sur l'autre userform ouvert.
La question est comment puis je faire pour mettre la référence à mon userform dans la création de ce contrôle, ou plus simplement comment remplacer userf dans ma ligne de code précédente.
Je ne sais pas si je suis clair mais je fais mon possible.