Voilà en fait je crée dans mon userform un bouton puis ensuite la macro qui s'execute lors du clic, cependant rien ne se passe lorsque je clique sur le bouton.
Voilà la syntaxe:
Sub userform_initialize()
'macro
Set bouton_1 = Me.Controls.Add("Forms.CommandButton.1", "bouton")
With bouton_1
.Width = 60
.Height = 40
.Top = hauteur + 20
.Left = 200
.Caption = "OK"
End With
End Sub
Sub bouton_1_Click()
MsgBox "N'oubliez pas votre rendez-vous"
End Sub