Note: The other languages of the website are Google-translated. Back to English

Cases à cocher Excel : ajouter, sélectionner, supprimer et utiliser des cases à cocher dans Excel

Une case à cocher est un outil interactif qui est utilisé pour sélectionner ou désélectionner une option, vous les verrez souvent sur des formulaires Web ou lorsque vous remplissez des enquêtes. Dans Excel, vous pouvez ajouter de nombreuses possibilités en cochant ou en décochant une case qui rend votre feuille plus dynamique et interactive, comme la création de listes de contrôle par des cases à cocher, l'insertion d'un graphique dynamique par des cases à cocher, etc.

Dans ce didacticiel, je vais vous présenter comment insérer, sélectionner, supprimer des cases à cocher et donner quelques exemples d'utilisation dans Excel.

Table des matières:

1. Deux types de cases à cocher (contrôle de formulaire de case à cocher contre contrôle ActiveX de case à cocher)

2. Ajoutez une ou plusieurs cases à cocher dans Excel

3. Modifiez le nom de la case à cocher et le texte de la légende

4. Liez une ou plusieurs cases à cocher aux cellules

5. Cochez une ou plusieurs cases

6. Supprimer une ou plusieurs cases à cocher

7. Regrouper les cases à cocher dans Excel

8. Exemples : Comment utiliser les cases à cocher dans Excel


Deux types de cases à cocher (contrôle de formulaire de case à cocher contre contrôle ActiveX de case à cocher)

Pour insérer une case à cocher, vous devez vous assurer que l'onglet Développeur s'affiche sur le ruban. L'onglet Développeur n'est pas actif par défaut, vous devez donc d'abord l'activer.

1. Dans le classeur Excel, cliquez sur Déposez le > Options. Dans le Options Excel boîte de dialogue, cliquez sur Personnalisez ruban, puis vérifier Développeur Option et cliquez sur OK bouton pour fermer cette boîte de dialogue.

2. Maintenant le Développeur L'onglet apparaît dans le ruban Excel comme illustré ci-dessous. Vous pouvez accéder à une variété de commandes interactives à partir de l'onglet Développeur selon vos besoins.

Microsoft Excel fournit deux types de cases à cocher-Contrôle de formulaire de case à cocher et notre Case à cocher Contrôle ActiveX:

Contrôle de formulaire de case à cocher est beaucoup plus simple que Case à cocher Contrôle ActiveX, et le Case à cocher Contrôle ActiveX est plus flexible dans sa conception et peut être utilisé comme objet dans les codes. Pour notre travail quotidien, les contrôles de formulaire sont suffisants, nous les utiliserons donc dans la plupart des cas.

Contrôle de formulaire de case à cocher contre contrôle ActiveX de case à cocher :

  • Les contrôles ActiveX offrent plus d'options de formatage, vous pouvez les utiliser pour une conception sophistiquée et flexible ;
  • Les contrôles de formulaire sont intégrés à Excel tandis que les contrôles ActiveX sont chargés séparément, ils peuvent donc parfois se figer ;
  • Certains ordinateurs ne font pas confiance aux contrôles ActiveX par défaut, vous devez donc les activer manuellement à partir du centre de gestion de la confidentialité ;
  • Le contrôle ActiveX de la case à cocher est accessible par programme via l'éditeur VBA ;
  • ActiveX n'est fourni que par l'option Windows et Mac OS ne le prend pas en charge.

Notes: Toutes les cases à cocher dont je parle dans les tutoriels suivants sont Cases à cocher Contrôle de formulaire.


Ajouter une ou plusieurs cases à cocher dans Excel

Pour insérer une ou plusieurs cases à cocher, cette section peut vous rendre service.

2.1 Insérer une case à cocher

Pour insérer une case à cocher, procédez comme suit :

1Cliquez sur Développeur onglet, puis cliquez sur insérer du Contrôles groupe, puis sélectionnez Case à cocher sous Contrôles de formulaire. Ensuite, cliquez sur une cellule où vous souhaitez insérer la case à cocher, et la case apparaîtra près de cette cellule, voir les captures d'écran :

2. Ensuite, placez votre curseur sur le bord de la case de sélection de votre case à cocher. Lorsqu'il se transforme en pointeur de déplacement, vous pouvez cliquer et faire glisser la case à cocher dans la cellule dont vous avez besoin, voir les captures d'écran :


2.2 Insérer plusieurs cases à cocher

Si vous avez besoin de plusieurs cases à cocher dans votre feuille de calcul, voici quelques moyens rapides pour vous.

 Insérer plusieurs cases à cocher avec l'option Poignée de remplissage

Pour insérer rapidement plusieurs cases à cocher, ajoutez une case à cocher comme décrit ci-dessus, puis utilisez l'option Remplir la poignée pour remplir les cases à cocher dans d'autres cellules.

1. Cliquez pour sélectionner la cellule où se trouve la case à cocher.

2. Faites glisser la poignée de remplissage vers le bas pour remplir les cases à cocher comme illustré ci-dessous :


 Insérer plusieurs cases à cocher avec le code VBA

Le code VBA suivant peut également vous aider à insérer rapidement et facilement une liste de cases à cocher. Veuillez faire comme ceci :

1. Maintenez le ALT + F11 clés pour ouvrir le Fenêtre Microsoft Visual Basic pour Applications.

2. Puis clique insérer > Moduleet collez le code suivant dans le Module fenêtre.

Code VBA : insérer plusieurs cases à cocher dans une liste de cellules

Sub InsertCheckBoxes()
'Update by Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Ws As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Ws = Application.ActiveSheet
Application.ScreenUpdating = False
For Each Rng In WorkRng
    With Ws.CheckBoxes.Add(Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        .Characters.Text = Rng.Value
    End With
Next
WorkRng.ClearContents
WorkRng.Select
Application.ScreenUpdating = True
End Sub

3. Et puis, appuyez sur F5 clé pour exécuter ce code. Une boîte de dialogue apparaîtra pour vous rappeler de sélectionner une plage de cellules pour insérer les cases à cocher. Voir capture d'écran :

4. Puis clique OK bouton, les cases à cocher sont insérées dans les cellules soigneusement à la fois, voir capture d'écran :


 Insérer plusieurs cases à cocher avec une fonctionnalité pratique

Si vous avez Kutools pour Excel, Avec son Cases à cocher d'insertion par lots fonctionnalité, vous pouvez insérer immédiatement les cases à cocher dans des cellules vides ou des cellules contenant des données.

Après l'installation de Kutools pour Excel, veuillez faire comme ceci:

1. Sélectionnez une plage de cellules où vous souhaitez insérer des cases à cocher.

2. Puis clique Kutools > insérer > Cases à cocher d'insertion par lots, voir capture d'écran:

3. Et puis, les cellules sélectionnées sont remplies de cases à cocher comme les captures d'écran suivantes :

 Insérer des cases à cocher dans des cellules vides  Insérer des cases à cocher dans les cellules de données
   

Modifier le nom de la case à cocher et le texte de la légende

Lorsque vous utilisez une case à cocher dans Excel, vous devez distinguer le nom de la case à cocher et le nom de la légende. Le nom de la légende est le texte que vous voyez à côté de la case à cocher, et le nom de la case à cocher est le nom que vous voyez dans la case Nom lorsque la case est cochée comme illustré ci-dessous :

 Nom de la case à cocher  Nom de la légende
   

Pour modifier le nom de la légende, cliquez avec le bouton droit sur la case à cocher, puis sélectionnez Éditer le texte dans le menu contextuel, et tapez le nouveau nom que vous voulez, voir les captures d'écran :

Pour changer le nom de la case à cocher, vous devez cocher la case, puis entrer le nom dont vous avez besoin dans le Boîte de nom comme ci-dessous la capture d'écran montrée:


Lier une ou plusieurs cases à cocher aux cellules

Lorsque vous utilisez la case à cocher, vous devez souvent lier les cases à cocher aux cellules. Si la case est cochée, la cellule affiche VRAI, et si elle n'est pas cochée, la cellule affiche FAUX ou vide. Cette section présentera comment lier une ou plusieurs cases à cocher à des cellules dans Excel.

4.1 Lier une case à cocher à une cellule avec la fonction de contrôle du format

Pour associer la case à cocher à une certaine cellule, procédez comme suit :

1. Cliquez avec le bouton droit sur la case à cocher, puis sélectionnez Contrôle du format depuis le menu contextuel, voir capture d'écran:

2. Dans le Objet de format boîte de dialogue, sous la Le contrôle onglet, cliquez pour sélectionner une cellule dans laquelle vous souhaitez créer un lien vers la case à cocher à partir de l'onglet Lien de cellule boîte, ou tapez la référence de cellule manuellement, voir capture d'écran :

3Cliquez sur OK pour fermer la boîte de dialogue, et maintenant, la case à cocher est liée à une cellule spécifique. Si vous le cochez, un VRAI s'affiche, décochez-le, un FAUX s'affiche comme ci-dessous :


4.2 Lier plusieurs cases à cocher aux cellules avec le code VBA

Pour lier plusieurs cases à cocher à des cellules à l'aide de la fonction de contrôle du format, vous devez répéter les étapes ci-dessus encore et encore. Cela prendra du temps s'il y a des centaines ou des milliers de cases à cocher à lier. Ici, je vais introduire un code VBA pour lier plusieurs cases à cocher à des cellules à la fois.

1. Accédez à la feuille de calcul qui contient les cases à cocher.

2. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

3. Puis clique insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA : Liez plusieurs cases à cocher aux cellules à la fois

Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "C"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
    Cells(i, xCChar).Value = True
Else
    Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub

Notes: Dans ce code, i = 2, le nombre 2 est la ligne de départ de votre case à cocher, et xCChar = "C", la lettre C est la colonne à laquelle vous voulez lier les cases à cocher. Vous pouvez les modifier selon vos besoins.

4. Et puis, appuyez sur F5 clé pour exécuter ce code, toutes les cases à cocher de la feuille de calcul active sont liées aux cellules spécifiées à la fois. Lorsque vous cochez une case, sa cellule relative affichera TRUE, en décochant la case, la cellule liée affichera FALSE, voir capture d'écran :


Cochez une ou plusieurs cases

Pour copier ou supprimer les cases à cocher dans une feuille de calcul, vous devez d'abord cocher les cases. Pour sélectionner une ou plusieurs cases à cocher, procédez comme suit :

Cochez une seule case : (deux façons)

  • Faites un clic droit sur la case à cocher, puis cliquez n'importe où à l'intérieur.
  • OR
  • Appuyez sur la touche Ctrl clé, puis cliquez sur la case à cocher.

Cochez plusieurs cases :

Appuyez et maintenez la Ctrl clé, puis cliquez sur les cases à cocher que vous souhaitez sélectionner une par une.


Supprimer une ou plusieurs cases à cocher

La suppression d'une case à cocher est facile pour nous, il vous suffit de la sélectionner, puis d'appuyer sur la touche Suppr de votre clavier. Quand il s'agit de plusieurs cases à cocher, comment pourriez-vous le faire dans Excel ?

6.1 Supprimer plusieurs cases à cocher avec le code VBA

Pour supprimer toutes les cases à cocher d'une feuille, vous pouvez appliquer le code VBA suivant.

1. Maintenez le ALT + F11 clés pour ouvrir le Fenêtre Microsoft Visual Basic pour Applications.

2. Puis clique Insérert> Moduleet collez le code suivant dans le Fenêtre du module.

Code VBA : Supprimer toutes les cases à cocher dans la feuille de calcul en cours

Sub RemoveCheckboxes()
'Update by Extendoffice
On Error Resume Next
ActiveSheet.CheckBoxes.Delete
Selection.FormatConditions.Delete
End Sub

3. Puis appuyez F5 touche pour exécuter le code. Toutes les cases à cocher de la feuille de calcul spécifique seront supprimées en même temps.


6.2 Supprimer plusieurs cases à cocher avec une fonctionnalité simple

Avec Kutools pour Excel» Cases à cocher de suppression par lots fonctionnalité, vous pouvez supprimer les cases à cocher d'une plage de sélection ou des feuilles entières selon vos besoins en quelques clics seulement.

Après l'installation de Kutools pour Excel, veuillez faire comme ceci:

1. Sélectionnez la plage de cellules ou la feuille entière contenant les cases à cocher que vous souhaitez supprimer.

2. Puis clique Kutools > Supprimer > Cases à cocher de suppression par lots, voir capture d'écran:

3. Et puis, toutes les cases à cocher sont supprimées à la fois de la sélection.


Regrouper les cases à cocher dans Excel

Lorsque vous souhaitez déplacer ou redimensionner plusieurs cases à cocher ensemble, le regroupement des cases à cocher peut aider à contrôler toutes les cases à cocher à la fois. Cette section explique comment regrouper plusieurs cases à cocher dans une feuille de calcul Excel.

7.1 Regrouper les cases à cocher à l'aide de la fonction Groupe

Dans Excel, le Nadlan Cette fonctionnalité peut aider à regrouper plusieurs cases à cocher, veuillez procéder comme suit :

1. Tenez le Ctrl clé, puis cliquez pour sélectionner les cases à cocher une par une que vous souhaitez regrouper, voir capture d'écran :

2. Ensuite, faites un clic droit et choisissez Nadlan > Nadlan depuis le menu contextuel, voir capture d'écran:

3. Et toutes les cases à cocher sélectionnées sont regroupées, vous pouvez les déplacer, les copier ensemble à la fois.


7.2 Regrouper les cases à cocher à l'aide de la commande Group Box

De plus, vous pouvez également utiliser le Boîte de groupe pour regrouper plusieurs cases à cocher. Veuillez suivre les étapes suivantes :

1. Aller à la Développeur onglet, puis cliquez sur insérer > Zone de groupe (contrôle de formulaire), voir capture d'écran:

2. Ensuite, faites glisser la souris pour dessiner une zone de groupe et modifiez le nom de la légende de la zone de groupe comme vous le souhaitez :

3. Maintenant, vous pouvez insérer des cases à cocher dans la zone de groupe, cliquez sur Développeur > insérer > Case à cocher (contrôle de formulaire), voir capture d'écran:

4. Ensuite, faites glisser la souris pour dessiner une case à cocher et modifiez le nom de la légende selon vos besoins, voir les captures d'écran

5. De même, insérez d'autres cases à cocher dans la zone de groupe et vous obtiendrez le résultat comme illustré ci-dessous :


Exemples : Comment utiliser les cases à cocher dans Excel

D'après les informations ci-dessus, nous connaissons certaines connaissances de base des cases à cocher. Dans cette section, je vais vous présenter comment utiliser les cases à cocher pour certaines opérations interactives et dynamiques dans Excel.

 Exemple 1 : Créer une liste de tâches avec des cases à cocher

La liste de tâches nous est utile pour marquer les tâches qui ont été accomplies dans notre travail quotidien. Dans une liste de tâches typique, les tâches terminées cochées ont le format barré comme la capture d'écran ci-dessous. À l'aide de cases à cocher, vous pouvez créer rapidement une liste de tâches interactive.

Pour créer une liste de tâches avec des cases à cocher, veuillez suivre les étapes suivantes :

1. Veuillez insérer les cases à cocher dans la liste des cellules que vous souhaitez utiliser, voir capture d'écran : (Cliquez pour savoir comment insérer plusieurs cases à cocher)

2. Après avoir inséré les cases à cocher, vous devez lier chaque case à cocher à une cellule distincte.

Conseils: Pour lier les cases à cocher aux cellules, vous pouvez utiliser le Contrôle du format fonctionnalité pour les lier aux cellules une par une, ou appliquer la Code VBA pour les relier à des cellules à la fois.

3. Après avoir lié les cases à cocher aux cellules, si la case est cochée, un VRAI s'affiche, si elle n'est pas cochée, un FAUX s'affiche, voir capture d'écran :

4. Ensuite, vous devez appliquer le Mise en forme conditionnelle fonction pour réaliser les opérations suivantes. Sélectionnez la plage de cellules A2:C8 pour laquelle vous souhaitez créer une liste de tâches, puis cliquez sur Accueil > Mise en forme conditionnelle > Nouvelle règle pour aller à la Nouvelle règle de formatage boite de dialogue.

5. Dans le Nouvelle règle de formatage dialogue, cliquez sur Utilisez une formule pour déterminer les cellules à formater à l' Sélectionnez un type de règle zone de liste, puis entrez cette formule = C2 = VRAI into the Formater les valeurs où cette formule est vraie zone de texte, voir capture d'écran:

Notes: C2 est une cellule liée à la case à cocher.

6. Ensuite, continuez en cliquant sur le Format bouton pour aller à la Format de cellule boite de dialogue. Sous le Fonte onglet, vérifiez le Barré du Effets section, et spécifiez une couleur pour l'élément de liste de tâches terminé comme vous le souhaitez, voir capture d'écran :

7. Puis clique OK > OK pour fermer les boîtes de dialogue, maintenant, lorsque vous cochez la case, son élément correspondant sera formaté comme barré comme ci-dessous la démonstration montrée :


 Exemple 2 : Créer un graphique dynamique avec des cases à cocher

Parfois, vous devrez peut-être afficher beaucoup de données et d'informations dans un seul graphique, et le graphique sera en désordre. Dans ce cas, vous pouvez utiliser les cases à cocher pour créer un graphique dynamique dans votre feuille. Lorsque vous cochez une case, la ligne de données correspondante s'affichera. Si vous la décochez, la ligne de données sera masquée, comme illustré ci-dessous :

Cette section parlera de deux astuces rapides pour créer ce type de graphique dans Excel.

 Créer un graphique interactif avec des cases à cocher dans Excel

Normalement, dans Excel, vous pouvez créer un graphique dynamique en utilisant des cases à cocher en suivant les étapes suivantes :

1. Insérez quelques cases à cocher et renommez-les. Dans ce cas, je vais insérer trois cases à cocher et les renommer Apple, Orange et Peach, voir capture d'écran :

2. Ensuite, vous devez lier ces cases à cocher aux cellules, veuillez cliquer pour sélectionner la première case à cocher, puis faites un clic droit, puis choisissez Contrôle du format, Dans le Objet de format boîte de dialogue, sous la Le contrôle onglet, à partir de Lien de cellule case, sélectionnez une cellule où lier avec la case à cocher, voir capture d'écran :

3. Répétez l'étape ci-dessus pour lier les deux autres cases à cocher à d'autres cellules. Maintenant, si vous cochez la case, un VRAI s'affichera, sinon, un FAUX s'affichera comme ci-dessous :

4. Après avoir inséré et lié les cases à cocher, vous devez maintenant préparer les données. Copiez les en-têtes de ligne et de colonne de données d'origine à un autre endroit, voir capture d'écran :

5. Appliquez ensuite les formules ci-dessous :

  • En cellule B13: = SI ($ B $ 6, B2, NA ()), et faites glisser la poignée de remplissage pour remplir la ligne de B13 à G13 ;
  • En cellule B14: = SI ($ B $ 7, B3, NA ()), et faites glisser la poignée de remplissage pour remplir la ligne de B14 à G14 ;
  • En cellule B15: = SI ($ B $ 8, B4, NA ()), et faites glisser la poignée de remplissage pour remplir la ligne de B15 à G15.
  • Ces formules renvoient les valeurs des données d'origine si la case de ce produit est cochée, et #N/A si elle n'est pas cochée. Voir capture d'écran :

6. Ensuite, veuillez sélectionner la nouvelle plage de données de A12 à G15, puis cliquez sur insérer > Insérer un graphique en courbes ou en aires > Gamme pour insérer un graphique en courbes.

7. Maintenant, lorsque vous cochez la case du produit, sa ligne de données apparaîtra et, lorsqu'elle sera décochée, elle disparaîtra comme illustré ci-dessous :

8. Après avoir créé le graphique, vous pouvez placer les cases à cocher sur le graphique pour les rendre plus propres. Cliquez pour sélectionner la zone de tracé, puis faites glisser pour la réduire, voir capture d'écran :

9. Et puis, appuyez sur Ctrl pour sélectionner les trois cases à cocher, faites-les glisser sur le graphique, puis faites un clic droit pour choisir Mettre au premier plan > Mettre au premier plan, voir capture d'écran:

10. Et les cases à cocher sont affichées sur le graphique, continuez à appuyer sur Ctrl touche pour sélectionner les cases à cocher et le graphique un par un, clic droit pour sélectionner Nadlan > Nadlan, voir capture d'écran:

11. Maintenant, les cases à cocher sont liées au graphique linéaire. Lorsque vous déplacez le graphique, les cases à cocher se déplacent également en conséquence.


 Créez un graphique interactif avec des cases à cocher avec une fonctionnalité simple

La méthode ci-dessus peut être quelque peu difficile pour vous, ici, je vais vous présenter un moyen simple de résoudre cette tâche. Avec Kutools pour Excel's Graphique en courbes de case à cocher fonctionnalité, vous pouvez créer facilement un graphique dynamique avec des cases à cocher.

Après l'installation de Kutools pour Excel, veuillez faire comme ceci:

1. Sélectionnez la plage de données dans laquelle vous souhaitez créer le graphique, puis cliquez sur Kutools > Charts > Comparaison des catégories > Graphique en courbes de case à cocher, voir capture d'écran:

2. Et puis, un Graphique en courbes de case à cocher boîte de dialogue apparaît, les données que vous avez sélectionnées sont remplies automatiquement dans leurs zones de texte séparées, voir capture d'écran :

3. Puis clique OK bouton, et une boîte de dialogue apparaît pour vous rappeler qu'une feuille masquée avec des données intermédiaires sera créée, veuillez cliquer sur Oui bouton, voir capture d'écran:

4. Et un graphique linéaire avec des cases à cocher sera créé avec succès, voir capture d'écran :


 Exemple 3 : Créer une liste déroulante avec des cases à cocher

La sélection de plusieurs éléments dans une liste déroulante peut être une tâche courante pour la plupart d'entre nous. Certains utilisateurs essaient de créer une liste déroulante avec des cases à cocher pour choisir plusieurs sélections, comme illustré ci-dessous. Malheureusement, il n'est pas possible de créer de telles listes déroulantes avec des cases à cocher dans Excel. Mais, ici, je présenterai deux types de sélection de plusieurs cases à cocher dans Excel. L'une est une zone de liste avec des cases à cocher et une autre est une liste déroulante avec des cases à cocher.

 Créer une liste déroulante avec des cases à cocher à l'aide de la zone de liste

Au lieu d'une liste déroulante, vous pouvez utiliser une zone de liste pour ajouter des cases à cocher pour une sélection multiple. Le processus est un peu compliqué, veuillez suivre les étapes ci-dessous étape par étape :

1. Tout d'abord, veuillez insérer une zone de liste, cliquez sur Développeur > insérer > Zone de liste (contrôle ActiveX). Voir la capture d'écran:

2. Faites glisser la souris pour dessiner une zone de liste, puis cliquez dessus avec le bouton droit, choisissez Propriétés depuis le menu contextuel, voir capture d'écran:

3. Dans le Propriétés volet, veuillez définir les opérations comme suit :

  • Dans le ListRemplirPlage , entrez la plage de données que vous souhaitez afficher dans la zone de liste ;
  • Dans le Style de liste boîte, sélectionnez 1 - Option de style fmList de la liste déroulante;
  • Dans le Sélection multiple boîte, sélectionnez 1 - fmMultiSelectMulti de la liste déroulante;
  • Enfin, cliquez sur le bouton de fermeture pour le fermer.

4. Ensuite, cliquez sur une cellule dans laquelle vous souhaitez afficher les multiples éléments sélectionnés et donnez-lui un nom de plage. Veuillez saisir un nom de plage "Élément de sortie" dans le Boîte de nom et appuyez sur Entrer clé, voir capture d'écran:

5. Et puis, cliquez insérer > Formes > Rectangle, faites glisser la souris pour dessiner un rectangle au-dessus de la zone de liste, voir capture d'écran :

6. Cliquez ensuite avec le bouton droit sur le rectangle et sélectionnez Attribuer une macro dans le menu contextuel. Voir la capture d'écran:

7. Dans le Attribuer une macro dialogue, cliquez sur Nouveautés bouton, voir capture d'écran:

8. Dans l'ouverture Microsoft Visual Basic pour applications fenêtre, remplacez le code d'origine dans la fenêtre Module par le code VBA ci-dessous :

Sub Rectangle1_Click()
'Updated by Extendoffice
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
    xStr = ""
    xStr = Range("Outputitem").Value
    
    If xStr <> "" Then
         xArr = Split(xStr, ";")
    For I = xLstBox.ListCount - 1 To 0 Step -1
        xV = xLstBox.List(I)
        For J = 0 To UBound(xArr)
            If xArr(J) = xV Then
              xLstBox.Selected(I) = True
              Exit For
            End If
        Next
    Next I
    End If
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
    For I = xLstBox.ListCount - 1 To 0 Step -1
        If xLstBox.Selected(I) = True Then
        xSelLst = xLstBox.List(I) & ";" & xSelLst
        End If
    Next I
    If xSelLst <> "" Then
        Range("Outputitem") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("Outputitem") = ""
    End If
End If
End Sub

Notes: Dans le code ci-dessus, Rectangle1 est le nom de la forme, ListBox1 est le nom de la zone de liste, et le Élément de sortie est le nom de plage de la cellule de sortie. Vous pouvez les modifier en fonction de vos besoins.

9. Ensuite, fermez la fenêtre de code. Maintenant, cliquer sur le bouton rectangle masquera ou affichera la zone de liste. Lorsque la zone de liste est affichée, sélectionnez les éléments dans la zone de liste et cliquez à nouveau sur le bouton rectangle pour afficher les éléments sélectionnés dans la cellule spécifiée, voir la démo ci-dessous :


 Créer une liste déroulante avec des cases à cocher avec une fonctionnalité étonnante

Pour ajouter les cases à cocher dans la vraie liste déroulante, vous pouvez utiliser un outil puissant - Kutools pour Excel, Avec son Liste déroulante avec cases à cocher fonctionnalité, vous pouvez créer rapidement et facilement des listes déroulantes avec plusieurs cases à cocher.

Après l'installation de Kutools pour Excel, veuillez faire comme ceci:

1. Tout d'abord, veuillez insérer la liste déroulante normale dans les cellules sélectionnées, voir capture d'écran :

2. Puis clique Kutools > La liste déroulante > Liste déroulante avec cases à cocher > Paramètres. Voir la capture d'écran:

3. Dans le Liste déroulante avec paramètres de cases à cocher boîte de dialogue, veuillez configurer comme suit.

  • Dans le Appliquer à section, spécifiez la portée d'application où vous allez créer des cases à cocher pour les cellules de la liste déroulante. Vous pouvez spécifier une certaine plage, une feuille de calcul en cours, un classeur en cours ou tous les classeurs ouverts en fonction de vos besoins ;
  • Dans le Mode section, choisissez modifier l'option;
  • Dans le Séparateur zone, tapez un délimiteur pour séparer les éléments sélectionnés ;
  • Dans le TDirection ext. section, sélectionnez la direction du texte en fonction de vos besoins ;
  • Enfin, cliquez sur le OK .

4. Après avoir terminé les réglages, cliquez sur Kutools > La liste déroulante > Liste déroulante avec cases à cocher > Activer la liste déroulante des cases à cocher pour activer cette fonction. Voir la capture d'écran:

5. À partir de maintenant, lorsque vous cliquez sur une cellule avec une liste déroulante, une liste avec des cases à cocher apparaîtra, puis sélectionnez les éléments en cochant les cases à cocher pour sortir les éléments dans la cellule comme le montre la démonstration ci-dessous :

Cliquez pour obtenir des informations plus détaillées sur cette fonctionnalité…


 Exemple 4 : Cochez la case pour changer la couleur de la ligne

Avez-vous déjà essayé de changer la couleur de la ligne en fonction de la case cochée ? Ce qui signifie que la couleur de la ligne associée sera modifiée si vous cochez une case comme illustré ci-dessous, cette section parlera de quelques astuces pour résoudre cette tâche dans Excel.

 Cochez la case pour changer la couleur de la cellule en utilisant le formatage conditionnel

Pour changer la couleur de la ligne en cochant ou décochant la case, le Mise en forme conditionnelle fonctionnalité dans Excel peut vous rendre service. Veuillez faire comme ceci :

1. Tout d'abord, insérez les cases à cocher dans la liste des cellules selon vos besoins, voir capture d'écran :

2. Ensuite, vous devez lier ces cases à cocher aux cellules à côté de chaque case à cocher séparément, voir capture d'écran :

Conseils: Pour lier les cases à cocher aux cellules, vous pouvez utiliser le Contrôle du format fonctionnalité pour les lier aux cellules une par une, ou appliquer la Code VBA pour les relier à des cellules à la fois.

3. Ensuite, sélectionnez la plage de données dont vous souhaitez modifier la couleur de ligne, puis cliquez sur Accueil > Mise en forme conditionnelle > Nouvelle règle, voir capture d'écran:

4. Dans le Nouvelle règle de formatage boîte de dialogue, effectuez les opérations ci-dessous:

  • Sélectionnez le Utilisez une formule pour déterminer les cellules à formater option dans la Sélectionnez un type de règle boîte;
  • Entrez cette formule =SI($F2=VRAI,VRAI,FAUX) into the Formater les valeurs où cette formule est vraie boîte;
  • Cliquez Format bouton pour spécifier une couleur que vous aimez pour les lignes.

Notes: Dans la formule, $F2 est la première cellule liée de la case à cocher.

5. Après avoir choisi la couleur, cliquez sur OK > OK pour fermer les boîtes de dialogue, et maintenant, lorsque vous cochez une case, la ligne correspondante sera automatiquement mise en surbrillance comme la démonstration ci-dessous :


  Cochez la case pour changer la couleur de la ligne en utilisant le code VBA

Le code VBA suivant peut également vous aider à changer la couleur de la ligne en fonction de la case cochée, veuillez utiliser le code ci-dessous :

1. Dans la feuille de calcul, vous souhaitez mettre en surbrillance les lignes par des cases à cocher, cliquez avec le bouton droit sur l'onglet de la feuille et sélectionnez Voir le code dans le menu contextuel. Voir la capture d'écran:

2. Copiez et collez le code ci-dessous dans le champ ouvert Microsoft Visual Basic pour applications fenêtre:

Code VBA : sélectionnez les lignes en cochant la case

Sub AddCheckBox()
Dim xCell As Range
Dim xRng As Range
Dim I As Integer
Dim xChk As CheckBox
On Error Resume Next
InputC:
    Set xRng = Application.InputBox("Please select the column range to insert checkboxes:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
If xRng.Columns.Count > 1 Then
    MsgBox "The selected range should be a single column", vbInformation, "Kutools fro Excel"
    GoTo InputC
Else
    If xRng.Columns.Count = 1 Then
        For Each xCell In xRng
            With ActiveSheet.CheckBoxes.Add(xCell.Left, _
               xCell.Top, xCell.Width = 15, xCell.Height = 12)
               .LinkedCell = xCell.Offset(, 1).Address(External:=False)
               .Interior.ColorIndex = xlNone
               .Caption = ""
               .Name = "Check Box " & xCell.Row
            End With
            xRng.Rows(xCell.Row).Interior.ColorIndex = xlNone
        Next
    End If
    With xRng
     .Rows.RowHeight = 16
    End With
    xRng.ColumnWidth = 5#
    xRng.Cells(1, 1).Offset(0, 1).Select
    For Each xChk In ActiveSheet.CheckBoxes
      xChk.OnAction = "Sheet2.InsertBgColor"
    Next
End If
End Sub

Sub InsertBgColor()
Dim xName As Integer
Dim xChk As CheckBox
For Each xChk In ActiveSheet.CheckBoxes
  xName = Right(xChk.Name, Len(xChk.Name) - 10)
  If (xName = Range(xChk.LinkedCell).Row) Then
   If (Range(xChk.LinkedCell) = "True") Then
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = 6
   Else
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = xlNone
   End If
  End If
Next
End Sub

Remarque : Dans le code ci-dessus, dans ce script xChk.OnAction = "Sheet2.InsertBgColor", vous devriez changer le nom de la feuille-Sheet2 à vous-même (Sheet2 est le vrai nom de la feuille de calcul, vous pouvez l'obtenir à partir du volet de la fenêtre de code de gauche). Voir capture d'écran :

3. Ensuite, placez le curseur dans la première partie du code et appuyez sur F5 clé pour exécuter le code. Dans le popping Kutools pour Excel boîte de dialogue, veuillez sélectionner la plage dans laquelle vous souhaitez insérer des cases à cocher, voir capture d'écran :

4. Puis clique OK bouton, les cases à cocher sont insérées dans les cellules sélectionnées comme illustré ci-dessous :

5. À partir de maintenant, si vous cochez une case, la ligne relative sera colorée automatiquement comme illustré ci-dessous :


 Exemple 5 : Compter ou additionner les valeurs des cellules si la case est cochée

Si vous avez une plage de données avec une liste de cases à cocher, maintenant, vous souhaitez compter le nombre de cases cochées ou additionner les valeurs correspondantes en fonction des cases cochées comme illustré ci-dessous. Comment pourriez-vous résoudre cette tâche dans Excel ?

Pour résoudre cette tâche, l'étape importante consiste à lier les cases à cocher aux cellules relatives à côté des données. La case cochée affichera VRAI dans la cellule liée, sinon, un FAUX sera affiché, puis vous pourrez utiliser la fonction de comptage ou de somme pour obtenir le résultat basé sur la valeur VRAI ou FAUX.

1. Tout d'abord, vous devez lier les cases à cocher aux cellules séparément, si la case est cochée, un VRAI s'affiche, si elle n'est pas cochée, un FAUX s'affiche, voir capture d'écran :

Conseils: Pour lier les cases à cocher aux cellules, vous pouvez utiliser le Contrôle du format fonctionnalité pour les lier aux cellules une par une, ou appliquer la Code VBA pour les relier à des cellules à la fois.

2. Ensuite, appliquez les formules suivantes pour compter ou additionner les valeurs en fonction des cases cochées :

Compter les valeurs en cochant les cases :

= COUNTIF (D2: D10, VRAI)

Notes: Dans cette formule, D2: D10 est la plage des cellules de lien que vous avez définies pour les cases à cocher.

Somme des valeurs par cases cochées :

= SOMMEPROD (($ D $ 2: $ D $ 10 = TRUE) * $ C $ 2: $ C $ 10)

Notes: Dans cette formule, D2: D10 est la plage des cellules de lien que vous avez définie pour les cases à cocher, et C2: C10 est la liste des cellules que vous souhaitez additionner.


 Exemple 6 : Si la case à cocher est cochée, renvoie une valeur spécifique

Si vous avez une case à cocher, lorsque vous la cochez, une valeur spécifique doit apparaître dans une cellule, et lorsque vous la décochez, une cellule vide s'affiche comme ci-dessous :

Pour terminer ce travail, veuillez procéder comme suit :

1. Tout d'abord, vous devez lier cette case à cocher à une cellule. Cliquez avec le bouton droit sur la case à cocher et choisissez Contrôle du format, dans le sauté Objet de format boîte de dialogue, sous la Le contrôle onglet, cliquez pour sélectionner une cellule où vous souhaitez lier avec la case à cocher de la Lien de cellule boîte, voir capture d'écran:

2. Puis clique OK bouton pour fermer la boîte de dialogue. Maintenant, tapez cette formule : =SI(A5=VRAI,"Extendoffice","") dans une cellule où vous souhaitez afficher le résultat, puis appuyez sur Entrer clé.

Notes: Dans cette formule, A5 est la cellule liée à la case à cocher, "Extendoffice” est le texte spécifique, vous pouvez les modifier selon vos besoins.

3. Maintenant, lorsque vous cochez la case, le texte spécifique s'affichera, lorsque vous le décocherez, une cellule vide s'affichera, voir la démo ci-dessous :



  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
  • Fusionner les cellules / lignes / colonnes et conservation des données; Contenu des cellules divisées; Combiner les lignes en double et la somme / moyenne... Empêcher les cellules en double; Comparer les gammesplus
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Formules favorites et insérer rapidement, Plages, graphiques et images; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
  • Regroupement du tableau croisé dynamique par numéro de semaine, jour de la semaine et plus encore ... Afficher les cellules déverrouillées et verrouillées par différentes couleurs; Mettre en évidence les cellules qui ont une formule / un nomplus
onglet kte 201905
  • 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!
bas de cabine
Commentaires (0)
Pas encore de notes. Soyez le premier à évaluer!
Il n'y a pas encore de commentaires postés ici
Laisser vos commentaires
Publier en tant qu'invité
×
Évaluez cet article:
0   Personnages
Emplacements suggérés