Comment supprimer tous les boutons ou boutons de commande dans Excel ?
Cet article explique comment supprimer tous les boutons de contrôle de formulaire ou boutons de commande de la 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, avec un code VBA.
Supprimer tous les boutons de contrôle de formulaire ou boutons de commande avec un 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. Activez le Mode Création en cliquant sur Développeur > Mode Création. Voir capture d'écran :
2. Sélectionnez l'un des boutons de commande et appuyez sur les touches Ctrl + A pour sélectionner tous les boutons dans la feuille de calcul actuelle.
3. Appuyez sur la touche Supprimer pour supprimer tous les boutons sélectionnés.
Remarque : 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, avec un code VBA.
De plus, vous pouvez appliquer le script VBA ci-dessous pour supprimer tous les boutons de la feuille de calcul actuelle dans Excel.
1. Ouvrez la feuille de calcul contenant les boutons que vous souhaitez supprimer, puis appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Dans la fenêtre Microsoft Visual Basic for Applications, 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. Appuyez sur la touche F5 pour exécuter le code. 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 actuelle.
Supprimer tous les boutons de contrôle de formulaire ou boutons de commande avec un 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 les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Dans la fenêtre Microsoft Visual Basic for Applications, cliquez sur Insérer > Module, puis copiez le code VBA ci-dessous dans la fenêtre Code.
Code VBA : Supprimer tous les boutons de contrôle de formulaire de la feuille active.
Sub Clear_ButtonsActiveSheet()
ActiveSheet.Buttons.Delete
End Sub
Code VBA : Supprimer 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. Appuyez sur la touche F5 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 actuelle.
Articles connexes :
- Comment insérer automatiquement une nouvelle ligne vide avec un bouton de commande dans Excel ?
- Comment utiliser un bouton de commande pour enregistrer la feuille de calcul active sous forme de fichier PDF dans Excel ?
- Comment mettre à jour ou insérer la date et l'heure (actuelles) avec un bouton de commande dans Excel ?
- Comment utiliser un bouton de commande pour modifier la valeur d'une cellule spécifiée dans Excel ?
Meilleurs outils de productivité pour Office
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 !