MartiFab
XLDnaute Nouveau
Bonjour à tous !
Mon Problème:
Je cherche à créer un bouton de commande sur un userform en passant par Private Sub Userform_Initialize(). Pour cela j’utilise un code semblable au suivant, appliqué à la UserForm1:
Une fois ce contrôle créé, je souhaiterais lui affecter une procédure afin d’afficher une nouvelle userform consécutivement à un clique de souris sur le bouton (type Private Sub btnName_Click()).
J’ai donc essayé de placer le code suivant a la suite du précédent :
Malheureusement, cela ne fonctionne pas. Le bouton est bien créer mais rien ne se passe lorsque l'on clique dessus.
Vous trouverez en pièce jointe un exemple de ce que j’explique précédemment.
Lorsque l'on se trouve dans Visual Basic Editor et que l'on place un contrôle sur une userform sans recourir à une macro, on doit double-cliquer ce contrôle pour lui affecter du code. Dans mon cas, je ne peux pas double-cliquer le contrôle dans VBE car il n'existe pas avant que la macro soit lancée.
Ma Question:
Existe-t-il un moyen d'affecter une commande a un contrôle sans pouvoir pré-visualiser ce contrôle dans Visual Basic Editor et le double-cliquer?
Si certains d'entre vous ont des suggestions, elles seront les bienvenues.
Merci a tous !
(Note : J’ai créé les deux userforms en passant par visual basic editor. Insert > Userform.)
Mon Problème:
Je cherche à créer un bouton de commande sur un userform en passant par Private Sub Userform_Initialize(). Pour cela j’utilise un code semblable au suivant, appliqué à la UserForm1:
Code:
Private sub UserForm_Initialize()
Dim btnCmd as Control
Set btnCmd = Me.Controls.Add(“forms.commandButton.1”)
With btnCmd
.Top = 20
.Left = 20
.Name = “btnNext”
.Caption = “See second usf”
End With
End Sub
Une fois ce contrôle créé, je souhaiterais lui affecter une procédure afin d’afficher une nouvelle userform consécutivement à un clique de souris sur le bouton (type Private Sub btnName_Click()).
J’ai donc essayé de placer le code suivant a la suite du précédent :
Code:
Private Sub btnName_Click()
UserForm2.show
End Sub
Malheureusement, cela ne fonctionne pas. Le bouton est bien créer mais rien ne se passe lorsque l'on clique dessus.
Vous trouverez en pièce jointe un exemple de ce que j’explique précédemment.
Lorsque l'on se trouve dans Visual Basic Editor et que l'on place un contrôle sur une userform sans recourir à une macro, on doit double-cliquer ce contrôle pour lui affecter du code. Dans mon cas, je ne peux pas double-cliquer le contrôle dans VBE car il n'existe pas avant que la macro soit lancée.
Ma Question:
Existe-t-il un moyen d'affecter une commande a un contrôle sans pouvoir pré-visualiser ce contrôle dans Visual Basic Editor et le double-cliquer?
Si certains d'entre vous ont des suggestions, elles seront les bienvenues.
Merci a tous !
(Note : J’ai créé les deux userforms en passant par visual basic editor. Insert > Userform.)