Accéder au contenu principal

Comment désactiver un bouton après un seul clic dans Excel ?

Author: Siluvia Last Modified: 2025-05-27

Dans certains cas, vous devrez peut-être déclencher un script VBA en cliquant sur un bouton de commande. Cependant, vous souhaiteriez que ce bouton de commande soit désactivé après avoir été cliqué une seule fois dans Excel. Comment y parvenir ? Cet article fournira une méthode pour vous aider à réaliser cela.

Désactiver le bouton après un seul clic dans Excel

Désactiver le bouton après un seul clic dans Excel

Supposons que vous souhaitiez copier automatiquement les données de la plage A1:C17 vers une nouvelle plage J1:L17 en cliquant sur le Bouton de Commande 1 dans la feuille de calcul actuelle. Et désactivez ce Bouton de Commande après la copie et le collage. Veuillez procéder comme suit.

1. Activez le Mode Création sous l'onglet Développeur en cliquant sur Développeur > Mode Création. Voir capture d'écran :

A screenshot of the Developer tab with Design Mode option highlighted

2. Faites un clic droit sur le Bouton de Commande auquel un script VBA a été attribué, puis cliquez sur Affichage du Code dans le menu contextuel.

A screenshot showing the View Code option in the Command Button context menu

3. Dans la fenêtre Microsoft Visual Basic for Applications, veuillez ajouter le code suivant dans l'avant-dernière partie du code original, comme indiqué dans la capture d'écran ci-dessous.

Code VBA : Désactiver le Bouton de Commande après un seul clic dans Excel

CommandButton1.Enabled = False

Remarque : CommandButton1 est le nom du Bouton de Commande.

A screenshot of VBA code to disable the Command Button in the Microsoft Visual Basic for Applications window

4. Ensuite, appuyez sur les touches Alt + Q pour quitter la fenêtre Microsoft Visual Basic for Applications.

5. Désactivez le Mode Création sous l'onglet Développeur.

Et après avoir cliqué sur le Bouton de Commande pour exécuter le code VBA une fois, le bouton deviendra gris et ne sera plus cliquable, comme le montre la capture d'écran ci-dessous.

A screenshot showing the Command Button grayed out after being disabled

Articles connexes :

Meilleurs outils de productivité pour Office

🤖 Kutools AI Aide : Révolutionner l'analyse des données basée sur : Exécution intelligente   |  Générer du code  |  Créer des formules personnalisées  |  Analyser les données et générer des graphiques  |  Invoquer les Fonctions améliorées…
Fonctionnalités populaires : Trouver, mise en évidence ou marquer les doublons   |  Supprimer les lignes vides   |  Consolider les colonnes ou les cellules sans perdre de données   |   Arrondir sans formule ...
Super RECHERCHEV : RECHERCHEV avec critères multiples  |   RECHERCHEV avec valeurs multiples  |   Recherche multi-feuilles   |   Correspondance floue ....
Liste déroulante avancée : Créer rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante multi-sélection ....
Gestionnaire de colonnes : Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages & colonnes ...
Fonctionnalités en vedette : Mise au point de la grille   |  Affichage de conception   |   Barre de formule améliorée   |  Gestionnaire de classeur & feuille de calcul   |  Bibliothèque dAutoTexte (Auto Text)   |  Sélecteur de date   |  Fusionner les données   |  Crypter/Déchiffrer les cellules   |  Envoyer un e-mail par liste   |  Super Filtre   |   Filtre spécial (filtrer les cellules avec une police en gras/italique/barré...) ...
Top15 ensembles d'outils : 12 outils de texte (Ajouter du texte, Supprimer des caractères spécifiques, ...)   |   50+ types de graphiques (Diagramme de Gantt, ...)   |   40+ formules pratiques (Calculer lâge en fonction de la date de naissance, ...)   |   19 outils d'insertion (Insérer un code QR, Insérer une image depuis le chemin, ...)   |  12 outils de conversion (Convertir en mots, Conversion de devises, ...)   |  7 outils de fusion & division (Fusion avancée des lignes, Diviser les cellules, ...)   |   ... et plus

Boostez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité sans précédent. Kutools pour Excel propose plus de300 fonctionnalités avancées pour augmenter la productivité et gagner du temps.  Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...

Office Tab apporte une interface à onglets à Office, et facilite grandement votre travail

  • Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de50 %, et réduit des centaines de clics de souris pour vous chaque jour !