Comment cocher une case à cocher en fonction de la valeur d'une cellule dans Excel ?

Vous savez peut-être comment modifier la valeur d'une cellule en fonction d'une case à cocher. Mais savez-vous comment cocher automatiquement une case à cocher en fonction de la valeur d'une cellule dans Excel ? Cet article vous montrera des méthodes pour y parvenir.

Cocher une case à cocher en fonction de la valeur d'une cellule avec une formule
Cocher une case à cocher en fonction de la valeur d'une cellule avec du code VBA

Cocher une case à cocher en fonction de la valeur d'une cellule avec une formule

Supposons que vous souhaitiez que la case à cocher 1 soit cochée automatiquement lorsque la valeur dans la cellule A1 est égale à « Test ». Veuillez procéder comme suit.

1. Après avoir inséré la case à cocher (Contrôle de formulaire), sélectionnez-la et liez-la à une cellule spécifiée C2 en entrant =C2 dans la barre de formule.

Pour une case à cocher Contrôle ActiveX, cliquez dessus avec le bouton droit et sélectionnez Propriétés dans le menu contextuel. Dans la boîte de dialogue Propriétés, entrez la cellule liée dans le champ CelluleLiée, puis fermez la boîte de dialogue. Voir capture d'écran :

2. Sélectionnez la cellule liée (C2), puis entrez la formule =SI(A2="Test";VRAI;FAUX) dans la barre de formule, puis appuyez sur la touche Entrée.

Remarque : Dans la formule, A2 et Test sont respectivement la cellule et la valeur de la cellule dont vous avez besoin pour cocher automatiquement la case.

3. Lorsque vous saisissez la valeur « Test » dans la cellule A1, la case à cocher correspondante sera cochée automatiquement. Voir capture d'écran :

Remarque : Cette formule n'est pas sensible à la casse.

Cocher une case à cocher en fonction de la valeur d'une cellule avec du code VBA

Vous pouvez exécuter le code VBA suivant pour cocher une case à cocher en fonction de la valeur d'une cellule dans Excel.

1. Cliquez avec le bouton droit sur l'onglet Feuille contenant la case à cocher basée sur la valeur de la cellule, puis cliquez sur Afficher le code dans le menu contextuel.

2. Dans la fenêtre Microsoft Visual Basic for Applications, copiez et collez le code VBA ci-dessous dans la fenêtre Code.

Code VBA : Cocher une case à cocher en fonction de la valeur d'une cellule

Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("A2").Value = "Test" Then
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOn
    Else
        ActiveSheet.CheckBoxes("Check Box 1").Value = xlOff
    End If
End Sub

Remarque : Dans le code, A2 et Test sont respectivement la cellule et la valeur de la cellule dont vous avez besoin pour cocher automatiquement la case. Case à cocher 1 est le nom de la case à cocher.

3. Appuyez sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic for Applications.

Lorsque vous saisissez la valeur « Test » dans la cellule A2, la case à cocher spécifiée sera cochée automatiquement.

Remarque : Ce code est sensible à la casse.

Astuce : Si vous souhaitez insérer plusieurs cases à cocher dans une plage sélectionnée en masse, vous pouvez essayer l'utilitaire Insérer des cases à cocher en lot de Kutools for Excel, ou insérer plusieurs boutons d'option en masse avec l'utilitaire Insérer des boutons d'option en lot. De plus, vous pouvez supprimer toutes les cases à cocher à la fois avec l'utilitaire Supprimer des cases à cocher en lot comme le montrent les captures d'écran ci-dessous. Vous pouvez aller télécharger Kutools for Excel ! (30-day free trial).

Articles connexes :

• Comment changer la valeur ou la couleur d'une cellule spécifique lorsqu'une case à cocher est cochée dans Excel ?
• Comment mettre en surbrillance une cellule ou une ligne avec une case à cocher dans Excel ?
• Comment insérer un horodatage dans une cellule si une case à cocher est cochée dans Excel ?
• Comment filtrer des données en fonction d'une case à cocher dans Excel ?
• Comment masquer une case à cocher lorsque la ligne est masquée dans Excel ?
• Comment créer une liste déroulante avec plusieurs cases à cocher dans Excel ?