Ouverture userform par une variable

[ograin]

Bonjour,
Je voudrais savoir s'il est possible d'attribuer le nom d'un userform à une variable et ensuite d'ouvrir ce dernier par l'intermédiaire de cette variable. Je veux ensuite avoir accès au command button du userform.

Voila le genre de code qu'il me faudrait :

Dim NomUserform as string
Dim NomBouton as string

NomUserform="NomDuFormulaire"
NomBouton="NomDuBouton"

NomUserForm.Control(NomBouton).Action que je veux faire

Merci d'avance
Ograin

 

[Guest]

Re : Ouverture userform par une variable

Bonjour,

Dim NomUsf As String, NomBtn As String
NomUsf = "UserForm1": NomBtn = "CommandButton1"
UserForms.Add (NomUsf)
With UserForms(0)
    .Controls(NomBtn).Top = 0
    .Show
End With

A+