cliquer sur un bouton par code

  • Initiateur de la discussion Initiateur de la discussion Charlotte
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

C

Charlotte

Guest
Bonjour,

J'ai deux boutons dans mon classeur. J'aimerais simuler le 'click' sur l'un des deux grâce à une ligne de code VBA.

Comment dois-je faire?

Merci.

Charlotte
 
Hug charlotte,

le problème est que l'événement Click du bouton est déclaré en private (privé = accessible seulement dans la feuille ou une Sub rattachée à la feuille). Pour contourner la problème, je vois 2 solutions (mais il en existe peut-être d'autres...)

La premiére est de modifier l'attribut Private en Public. Pour l'exemple, j'ai mis sur la feuille Feuil1 un bouton qui remplit A1:
Code:
Private Sub CommandButton1_Click()
Range('a1') = 456
End Sub
devient
Code:
Public Sub CommandButton1_Click()
Range('a1') = 456
End Sub

' CommandButton1_Click sera alors accessible partout dans ton projet, dans un module tu peux mettre par exemple:

Sub test()
    Call Feuil1.CommandButton1_Click
End Sub

Mais au niveau sécurité, c'est pas le top... je préférerai cette solution: Ajouter une Sub sur Feuil1 et appeler cette sub:
Code:
'Sur Feuil1:
Private Sub CommandButton1_Click()
Range('a1') = 456
End Sub

Public Sub lance_bt1()
Call CommandButton1_Click
End Sub

'Et dans ton module (ou ailleurs dans le projet)
Sub test()
Call Feuil1.lance_bt1
End Sub

Si ce que je viens de dire ressemble à du chinois :lol: , fais moi signe, j'essayerai d'être plus clair. 😉

Bon courage
A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
32
Affichages
1 K
  • Question Question
Réponses
32
Affichages
752
Réponses
14
Affichages
484
Retour