Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment supprimer tous les boutons ou boutons de commande dans Excel?

Cet article parle de supprimer tous les boutons de contrôle de formulaire ou les boutons de commande de feuille active dans Excel.

Supprimer tous les boutons, y compris les boutons de contrôle de formulaire et les boutons de commande en les sélectionnant tous

Supprimer tous les boutons, y compris les boutons de contrôle de formulaire et les boutons de commande par code VBA

Supprimez tous les boutons de contrôle de formulaire ou les boutons de commande avec le code VBA



Supprimer tous les boutons, y compris les boutons de contrôle de formulaire et les boutons de commande en les sélectionnant tous


Veuillez procéder comme suit pour supprimer tous les boutons (y compris les boutons de contrôle de formulaire et les boutons de commande) de la feuille de calcul active.

1. Activer le mode Création en cliquant sur Développeur > Mode de conception. Voir la capture d'écran:

2. Sélectionnez l'un des boutons de commande et appuyez sur Ctrl + A touches pour sélectionner tous les boutons dans la feuille de calcul en cours.

3. appuie sur le Effacer touche pour supprimer tous les boutons sélectionnés.

Note: S'il y a d'autres objets dans cette feuille de calcul, ils seront également sélectionnés.


Supprimer tous les boutons, y compris les boutons de contrôle de formulaire et les boutons de commande par code VBA

En outre, vous pouvez appliquer ci-dessous script VBA pour supprimer tous les boutons de la feuille de calcul en cours dans Excel.

1. Ouvrez la feuille de calcul contenant les boutons que vous souhaitez supprimer, puis appuyez sur autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module, puis copiez le code VBA ci-dessous dans la fenêtre Code.

Code VBA: Supprimer tous les boutons de la feuille active

Sub Clear_ButtonsActiveSheet()
    Dim I As Long
    Dim xOLE As Object
    On Error Resume Next
    ActiveSheet.Buttons.Delete
    For Each xOLE In ActiveSheet.OLEObjects
        If TypeName(xOLE.Object) = "CommandButton" Then
            xOLE.Delete
        End If
    Next
End Sub

3. appuie sur le F5 clé pour exécuter le code. Ensuite, tous les boutons, y compris les boutons de contrôle de formulaire et les boutons de commande, sont immédiatement supprimés de la feuille de calcul en cours.


Supprimez tous les boutons de contrôle de formulaire ou les boutons de commande avec le code VBA

Si vous souhaitez uniquement supprimer tous les boutons de contrôle de formulaire ou tous les boutons de commande de la feuille active. Vous pouvez essayer les codes VBA ci-dessous pour y parvenir.

1. Ouvrez la feuille de calcul contenant les boutons que vous souhaitez supprimer, puis appuyez sur autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module, puis copiez le code VBA ci-dessous dans la fenêtre Code.

Code VBA: supprime tous les boutons de contrôle de formulaire de la feuille active

Sub Clear_ButtonsActiveSheet()
    ActiveSheet.Buttons.Delete
End Sub

Code VBA: supprime tous les boutons de commande de la feuille active

Sub Clear_ButtonsActiveSheet()
    Dim xOLE As Object
    On Error Resume Next
    For Each xOLE In ActiveSheet.OLEObjects
        If TypeName(xOLE.Object) = "CommandButton" Then
            xOLE.Delete
        End If
    Next
End Sub

3. appuie sur le F5 clé pour exécuter le code.

Ensuite, tous les boutons de contrôle de formulaire ou tous les boutons de commande sont immédiatement supprimés de la feuille de calcul en cours.


Articles Liés:



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.