Exécuter un bouton de commande à partir d'un autre bouton de commande

Fermé

Lean - 14 déc. 2020 à 14:35
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 15 déc. 2020 à 08:35

Bonjour à tous,
Je sais que je vous sollicite beaucoup en ce moment mais je débute en VBA et c'est pas toujours facile.
Du coup, pourriez-vous, s'il vous plaît, m'aider à ce sujet:
Est-ce possible d'exécuter un bouton de commande à partir d'un autre bouton de commande ?
Cordialement
Lean

A voir également:

Exécuter un bouton de commande à partir d'un autre bouton de commande
Invite de commande - Guide
Commande terminal mac - Guide
Annuaire portable gratuit a partir d'un nom - Forum Réseaux sociaux
Chaque fichier en ligne sur le web a un chemin d’accès sur un serveur. c’est le cas du fichier du logo présent sur la page de cette ville. quel est le chemin de ce fichier à partir de la racine du site ? - Forum Graphisme
Ce programme est écrit en python. il construit un mot secret dans une variable mais il ne l'affiche pas. modifiez-le pour qu'il affiche le mot secret. exécutez-le. quel est ce mot secret ? ✓ - Forum Python

2 réponses

Réponse 1 / 2

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
14 déc. 2020 à 16:10

Bonjour,

En associant le code du CommandButton1 à une macro ça devrait être plus facile.

Exemple :

Private Sub CommandButton1_Click()
   Call Macro1
End Sub
Private Sub CommandButton2_Click()
   Call Macro1
   Call Macro2
End Sub
Private Sub Macro1()
   MsgBox "Code de la macro1 exécuté"
End Sub
Private Sub Macro2()
   MsgBox "Code de la macro2 exécuté"
End Sub

Réponse 2 / 2

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
Modifié le 14 déc. 2020 à 16:33

Bonjour Lean,
salut Pijaku, Ca va ?

curieux j'aurais plutôt écrit

Option Explicit
'--------------------------------------------------
Private Sub CommandButton1_Click()
    Call macro1
    CommandButton2.Enabled = True
End Sub


Private Sub CommandButton2_Click()
    CommandButton2.Enabled = False
    Call macro2
End Sub

Sub macro1()
    MsgBox "bonjour"
End Sub

Sub macro2()
    MsgBox "Au revoir"
    End Sub

https://mon-partage.fr/f/riwQu26A/

Nota:au 1° départ la propriété "enabled" du bouton 2 doit être "False"

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743
14 déc. 2020 à 17:01

Salut Michel,

Ça va plutôt bien. Merci.
et toi?

Pour la question en cours, je l'ai comprise dans ce sens :
"Comment exécuter, au clic sur mon bouton2, le code du bouton1 en plus du code du bouton2."
D'où ma réponse.

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303 > pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024
14 déc. 2020 à 18:35

Oui, d'accord; on verra ce qu'en pense Lean mais quelque soit sa réponse ça n'est pas grave du tout

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 743 > michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023
15 déc. 2020 à 08:35

Salut,

Non, ça n'est pas grave, c'est même beaucoup mieux, réponse complète comme ça, en 2 coups de cuillères à pot!

Et c'est toujours un plaisir de te croiser...

Discussions similaires

Annuaire portable gratuit à partir d'un nom

Où est la touche SHIFT sur mon clavier d'ordi ?

Comment trouver un numéro à partir du nom et prénom

Bouton ON OFF, O ou I ?

Quel est la touche shift sur le clavier

Discussions similaires

Newsletters