Comment sélectionner toutes les cases à cocher avec une seule case à cocher dans Excel ?

Les cases à cocher sont très utiles pour les utilisateurs d'Excel. Avec une liste de cases à cocher, nous pouvons sélectionner certaines options sur une feuille de calcul. S'il y a beaucoup de cases à cocher qui doivent être sélectionnées en une seule fois, les sélectionner une par une serait fastidieux et chronophage. Ici, je peux vous montrer comment sélectionner toutes les cases à cocher avec 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 immédiatement sélectionnées.

Sélectionner toutes les cases à cocher avec une seule case à cocher grâce à un code VBA

Sélectionner toutes les cases à cocher avec une seule case à cocher grâce à un code VBA

Pour sélectionner toutes les cases à cocher d'une feuille de calcul en utilisant une seule case à cocher principale, suivez les étapes suivantes :

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. Ensuite, maintenez les touches ALT + F11 enfoncées, ce qui ouvre la fenêtre Microsoft Visual Basic for Applications.

3. Cliquez sur Insérer > Module, puis collez le code suivant dans la fenêtre Module.

Code VBA : sélectionner toutes les cases à cocher avec 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. Ensuite, enregistrez et fermez ce code, revenez à la feuille de calcul, faites un clic droit sur la case à cocher Sélectionner tout, puis choisissez Assigner une macro dans le menu contextuel, voir capture d'écran :

5. Dans la boîte de dialogue Assigner une macro, cliquez sur l'option SelectAll_Click dans la liste des noms de macros, puis cliquez sur le bouton OK 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 sont cochées en une seule fois.

Remarque : Dans le code ci-dessus, Case à cocher 1 est le nom de votre case à cocher principale, vous pouvez le voir dans la zone Nom en faisant un clic droit dessus, et le modifier selon vos besoins.

Découvrez la magie d'Excel avec Kutools AI

• Exécution intelligente : Effectuez des opérations sur les cellules, analysez les données et créez des graphiques, le tout piloté par des commandes simples.
• Formules personnalisées : Générez des formules adaptées pour rationaliser vos flux de travail.
• Codage VBA : Écrivez et implémentez du code VBA sans effort.
• Interprétation des formules : Comprenez facilement des formules complexes.
• Traduction de texte : Surmontez les barrières linguistiques dans vos feuilles de calcul.

Améliorez vos capacités Excel avec des outils alimentés par l'IA. Téléchargez maintenant et découvrez une efficacité sans précédent !

Articles connexes :

Comment lier une case à cocher à plusieurs cellules dans Excel ?

Comment insérer rapidement plusieurs cases à cocher dans Excel ?

Comment supprimer rapidement plusieurs cases à cocher dans Excel ?