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.

Débloquez Excel Magic 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 sur mesure pour rationaliser vos flux de travail.
• Codage VBA: Écrivez et implémentez du code VBA sans effort.
• Interprétation de la formule: Comprendre facilement des formules complexes.
• Traduction de texte: Brisez les barrières linguistiques dans vos feuilles de calcul.

Améliorez vos capacités Excel avec des outils basés sur l'IA. Téléchargez et faites l'expérience d'une efficacité comme jamais auparavant !

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?