Comment appliquer un bouton pour effacer des cellules spécifiques dans Excel ?
Normalement, vous pouvez maintenir la touche Ctrl enfoncée pour sélectionner plusieurs cellules spécifiques, puis effacer le contenu des cellules selon vos besoins. Si vous devez régulièrement effacer ces cellules spécifiques de temps à autre, vous pouvez créer un bouton d'effacement pour les effacer d'un seul clic. Dans cet article, je vais expliquer comment créer un bouton « Tout effacer » pour effacer le contenu de certaines cellules spécifiques.
Appliquer un bouton pour effacer le contenu de cellules spécifiques avec du code VBA
Appliquer un bouton pour effacer le contenu de cellules spécifiques avec du code VBA
Tout d'abord, vous devez créer un bouton sous forme de forme, puis appliquer un code, et enfin lier ce code au bouton. Veuillez procéder comme suit :
1. Cliquez sur Insertion > Formes > Rectangles pour sélectionner la forme Rectangle, puis faites glisser la souris pour dessiner un bouton rectangulaire n'importe où sur la feuille de calcul selon vos besoins, voir capture d'écran :
2. Ensuite, saisissez le texte et formatez le bouton de forme selon vos besoins, voir capture d'écran :
3. Ensuite, vous devez insérer le code VBA. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic for Applications. Cliquez sur Insertion > Module, et collez le code suivant dans la fenêtre Module.
Sub Clearcells()
'Updateby Extendoffice
Range("A2", "A5").Clear
Range("C10", "D18").Clear
Range("B8", "B12").Clear
End Sub
Remarque : Dans le code ci-dessus : A2,A5 indique qu'il effacera les cellules dans la plage A2:A5, et pas seulement les deux cellules individuellement. Vous pouvez également ajouter plusieurs plages, telles que Plage("B8", "B12").Effacer le script dans le code pour effacer.
4. Ensuite, enregistrez et fermez la fenêtre de code, puis liez le code au bouton de forme. Faites un clic droit sur le bouton, puis sélectionnez Attribuer une macro. Dans la boîte de dialogue Attribuer une macro, choisissez le nom de code Clearcells dans la liste des noms de macros, puis cliquez sur le bouton OK pour quitter cette boîte de dialogue. Voir capture d'écran :
5. Et maintenant, lorsque vous cliquez sur le bouton Tout effacer, les cellules spécifiques que vous avez définies sont immédiatement effacées, voir capture d'écran :
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement 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 chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels