Comment sélectionner toutes les cases à cocher en utilisant une seule case à cocher dans Excel?
Les cases à cocher sont très utiles pour nos utilisateurs d'Excel, avec une liste de cases à cocher, nous pouvons sélectionner certaines options sur une feuille de calcul. Si de nombreuses cases à cocher doivent être cochées à la fois, les sélectionner une par une sera fastidieuse et prend du temps. Ici, je peux vous présenter pour sélectionner toutes les cases à cocher en utilisant une seule case à cocher, c'est-à-dire que lorsque vous cochez cette case principale, toutes les cases à cocher de la feuille de calcul actuelle seront sélectionnées immédiatement.
Cochez toutes les cases à l'aide d'une seule case à cocher avec le code VBA
Cochez toutes les cases à l'aide d'une seule case à cocher avec le code VBA
Pour sélectionner toutes les cases à cocher d'une feuille de calcul en utilisant une seule case à cocher principale, procédez comme suit:
1. Tout d'abord, vous pouvez ajouter une case à cocher et la nommer Sélectionner tout, ce sera votre case à cocher principale, voir capture d'écran:
2. Puis maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.
3Cliquez sur insérer > Moduleet collez le code suivant dans le Fenêtre du module.
Code VBA: cochez toutes les cases à l'aide d'une seule case à cocher
Sub SelectAll_Click()
'Update by Extendoffice
Dim xCheckBox As CheckBox
For Each xCheckBox In Application.ActiveSheet.CheckBoxes
If xCheckBox.Name <> Application.ActiveSheet.CheckBoxes("Check Box 1").Name Then
xCheckBox.Value = Application.ActiveSheet.CheckBoxes("Check Box 1").Value
End If
Next
End Sub
4. Et puis enregistrez et fermez ce code, revenez à la feuille de calcul, faites un clic droit sur le Sélectionner tout case à cocher et choisissez Attribuer une macro depuis le menu contextuel, voir capture d'écran:
5. Dans le Attribuer une macro boîte de dialogue, cliquez sur Tout sélectionner_Cliquer option dans la Nom de la macro zone de liste, puis cliquez sur OK bouton pour fermer cette boîte de dialogue, voir capture d'écran:
6. Et maintenant, lorsque vous cochez la case principale Sélectionner tout, toutes les autres cases à cocher de la feuille de calcul actuelle ont été cochées en même temps.
Notes: Dans le code ci-dessus, la case à cocher 1 est le nom de votre case à cocher principale, vous pouvez l'afficher dans le Zone Nom en cliquant dessus avec le bouton droit et modifiez-le selon vos besoins.
Articles Liés:
Comment lier la case à cocher à plusieurs cellules dans Excel?
Comment insérer rapidement plusieurs cases à cocher dans Excel?
Comment supprimer rapidement plusieurs cases à cocher dans Excel?
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 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
- Activer l'édition 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é de 50% et réduit des centaines de clics de souris chaque jour!
