XL 2019 Evènement sur bouton créé à l'initialisation d'un UserForm

marg55

XLDnaute Nouveau
Bonjour à tous,

j'ai créé un User Form sur lequel j'ai fait apparaître un bouton. J'aimerai pouvoir associer à ce bouton un événement mais ca ne fonctionne pas ! quelqu'un saurait me dire comme faire en sorte que mon évènement reconnaisse l'action de cliquer sur le bouton?
Mon programme est le suivant :

Public Multipage1 As MSForms.MultiPage
Private Sub UserForm_Initialize()
Set Multipage1 = Me.Controls.Add("Forms.MultiPage.1", "Multipage1")
With Multipage1
.Top = 175
.Left = 40
.Width = 1150
.Height = 475
End With
Set MyControl = Multipage1.Page1.Controls.Add("Forms.Label.1")
With MyControl
.Caption = "label"
.Left = 15
.Top = 25
.Width = 200
.Height = 25
.BorderStyle = 1
.FontSize = 10
End With
Set Control = Me.Controls.Add("Forms.CommandButton.1")
With Control
.Name = Bouton1
.Caption = "Valider"
.Top = 10
.Left = 40
.Width = 100
.Height = 50
.FontSize = 15
End With
End Sub

Private Sub Bouton1_Click()
MsgBox "Salut"
End Sub
 

marg55

XLDnaute Nouveau
Bonjour

sans avoir creusé, je pense qu'il te manque le fait d'associer le control à sa classe / affecter toutes les méthodes dudit controle

un peu de lecture ici, je pense que tu devrais trouver ton bonheur

Bonjour, après avoir cherché j'ai effectivement pu faire ce que je voulais mais désormais j'aimerai que mon événement fonctionne pour plusieurs événements similaires mais sur plusieurs contrôles différents !

Par exemple j'ai deux TextBox, j'en ai programmé une avec une classe pour que lorsque je change le contenu de la textBox, on m'envoie une Textox. Maintenant j'aimerai simplment lié à la classe ma deuxième TextBox pour qu'il lui arrive pareil mais sans reprogrammé une classe ! Je vous joins ce que j'ai fait pour que vous puissiez m'aiguiller.

J'ai également l'impression qu'on ne pouvait pas mettre mes deux classes dans une seule, est ce que je me trompe ?

Merci à Tous.
 

Pièces jointes

  • test 6.3.2 - évenementbouton plusieurs évenemnts.xlsm
    35.9 KB · Affichages: 4

Discussions similaires

Réponses
1
Affichages
164
Réponses
0
Affichages
148

Statistiques des forums

Discussions
312 177
Messages
2 085 972
Membres
103 073
dernier inscrit
MSCHOE16