Bouton inactif au clic [Résolu]

radikal64 7 Messages postés jeudi 22 mars 2007Date d'inscription 4 octobre 2010 Dernière intervention - 27 sept. 2010 à 15:19 - Dernière réponse : Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention
- 28 sept. 2010 à 10:17
Bonjour,

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


Merci d'avance pour votre aide!
Afficher la suite 

3 réponses

Répondre au sujet
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 27 sept. 2010 à 16:02
+3
Utile
bouton_1 est déclaré où ? (penser au WithEvents)

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de Renfield
radikal64 7 Messages postés jeudi 22 mars 2007Date d'inscription 4 octobre 2010 Dernière intervention - 27 sept. 2010 à 16:37
0
Utile
Bonjour,

Je me rends compte que j'avais oublié un underscore 1 dans ma déclaration du début:
Public WithEvents bouton_1 As msforms.CommandButton

Maintenant ça fonctionne!!!
Merci @ toi sinon je n'aurais pas pensé à regarder.
Commenter la réponse de radikal64
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 28 sept. 2010 à 10:17
0
Utile
ajouter Option Explicit tout en haut du module t'aurai éviter ce désagrément en vérifiant que bouton_1 etait bien déclaré...

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Commenter la réponse de Renfield

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.