KutoolsforOffice — Une solution unique, cinq outils puissants.Faire plus avec moins d'efforts.Soldes de mars : 20 % de réduction

Comment modifier la valeur ou la couleur d’une cellule spécifique lorsqu’une case à cocher est cochée dans Excel ?

AuteurSiluvia Date de modification

Cet article vous explique comment modifier automatiquement la valeur ou la couleur de fond d’une cellule spécifique à l’aide d’une case à cocher. Par exemple, dès qu’une case à cocher est cochée, la valeur ou la couleur de fond de la cellule concernée change instantanément. Suivez pas à pas les méthodes ci-dessous pour obtenir ce résultat.

Modifier la valeur d’une cellule spécifique lorsque la case à cocher est cochée à l’aide d’une formule
Modifier la valeur d’une cellule spécifique lorsque la case à cocher est cochée à l’aide d’un code VBA
Modifier la couleur d’une cellule spécifique lorsque la case à cocher est cochée à l’aide d’un code VBA


Modifier la valeur d’une cellule spécifique lorsque la case à cocher est cochée à l’aide d’une formule

Supposons que vous souhaitiez que la cellule A1 affiche « test » lorsque la Case à cocher 1 est cochée, et qu’elle reste vide dès qu’elle est décochée. Voici la marche à suivre.

Commencez par lier la case à cocher à une cellule spécifique, puis appliquez une formule pour obtenir le résultat souhaité.

1. Pour lier la case à cocher à une cellule spécifique, sélectionnez-la, saisissez la référence de la cellule dans la zone Barre de formule, puis appuyez sur la touche Entrée. Ici, je lie la case à cocher 1 à la cellule C2 en saisissant =C2 dans la zone Barre de formule après avoir sélectionné la case à cocher.

saisissez une formule dans la barre de formule après avoir sélectionné la case à cocher

Pour un contrôle ActiveX Case à cocher, cliquez dessus avec le bouton droit de la souris et sélectionnez Propriétés dans le menu contextuel. Dans la boîte de dialogue Propriétés, saisissez la cellule liée dans le champ CelluleLiée, puis fermez la boîte de dialogue. Voir la capture d’écran :

sélectionnez Propriétés et définissez les options

2. Sélectionnez la cellule dont vous souhaitez modifier la valeur (ici, j’ai choisi A1), saisissez la formule =IF(C2,«Test»,«») dans la barre de formule, puis appuyez sur la touche Entrée. Voir la capture d’écran :

sélectionnez la cellule pour modifier sa valeur et saisissez une formule

Remarque : dans la formule, C2 est la cellule liée à la case à cocher 1, et « Test » est la valeur affichée dans la cellule A1 lorsque la case à cocher est cochée.

Vous pouvez observer les résultats illustrés ci-dessous après avoir coché ou décoché la Case à cocher correspondante.

la valeur est modifiée selon que la case à cocher est cochée ou non

une capture d’écran de kutools for excel ai

Libérez la magie d’Excel avec Kutools IA

  • Exécution intelligente : effectuez des opérations sur les cellules, analysez des données et créez des graphiques, le tout à partir de commandes simples.
  • formules personnalisées : créez des formules sur mesure pour rationaliser vos flux de travail.
  • Programmation VBA : Écrivez et implémentez du code VBA en toute simplicité.
  • Interprétation de formules : Décryptez facilement les formules complexes.
  • Traduction de texte : Franchissez les barrières linguistiques directement depuis vos feuilles de calcul.
Améliorez vos capacités Excel grâce à des outils alimentés par l’intelligence artificielle.Téléchargez dès maintenantet découvrez une efficacité inégalée !

Modifier la valeur d’une cellule spécifique lorsque la case à cocher est cochée à l’aide d’un code VBA

Vous pouvez également modifier la valeur d’une cellule spécifique lorsque la case à cocher est cochée à l’aide d’un code VBA. Procédez comme suit.

1. Cliquez avec le bouton droit sur l’onglet de la feuille contenant la cellule dont la valeur doit être modifiée en fonction de la case à cocher, puis cliquez sur Afficher le code dans le menu contextuel.

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

Code VBA : Modifier la valeur d’une cellule spécifique lorsque la case à cocher est cochée

Private Sub CheckBox1_Click()
Dim xRng As Range
Dim xCell As Range, xStr As String
Set xRng = Selection
If CheckBox1.Value = True Then
    xStr = InputBox("Please enter a value:", "Kutools for Excel")
    xRng.Value = xStr
    If xStr = "" Then CheckBox1.Value = False
Else
    xRng.Value = ""
End If
End Sub

cliquez sur Afficher le code et insérez le code dans le module de feuille

Remarque : dans ce code, ChekBox1 est le nom de la case à cocher (contrôles ActiveX). Vous pouvez l’adapter à vos besoins.

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

4. Sélectionnez une cellule vide (A1) dont vous souhaitez modifier la valeur en fonction de la case à cocher, puis cochez la case « checkbox1 » dans votre feuille de calcul. La boîte de dialogue Kutools pour Excel s’ouvre alors. Saisissez la valeur que vous souhaitez insérer dans la cellule sélectionnée, puis cliquez sur le bouton OK. Voir la capture d’écran :

saisissez la valeur que vous souhaitez insérer dans la cellule vide sélectionnée

La valeur spécifiée s’affiche instantanément dans la cellule sélectionnée. Dès que vous décochez la case, la cellule redevient vide.

la valeur spécifiée s’affiche si la case à cocher est cochée, sinon, la cellule reste vide

Remarque : ce code vous demandera systématiquement de saisir une valeur textuelle dès que vous cocherez la case à cocher.


Modifier la couleur d’une cellule spécifique lorsque la case à cocher est cochée à l’aide d’un code VBA

Cette section vous montre comment modifier la couleur d’une cellule spécifique lorsque la case à cocher est cochée à l’aide d’un code VBA.

1. Cliquez avec le bouton droit sur l’onglet de feuille contenant la cellule dont la couleur doit être modifiée en fonction de la case à cocher, puis cliquez sur Afficher le code dans le menu contextuel.

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

Code VBA : Modifier la couleur d’une cellule spécifique lorsque la case à cocher est cochée

Sub CheckBox1_Click()
Dim xRng As Range
Set xRng = Selection
If CheckBox1.Value = True Then
    xRng.Interior.Color = vbRed
Else
    xRng.Interior.Color = xlNone
End If
End Sub

cliquez sur Afficher le code et insérez le code dans le module de feuille

Remarque: dans ce code,ChekBox1est le nom du Case à cocher (contrôles ActiveX). Vous pouvez le modifier selon vos besoins.

3. Sélectionnez une cellule dont vous souhaitez modifier la couleur de fond, puis cochez la case. Vous verrez aussitôt sa couleur de remplissage passer au rouge. Dès que vous décochez la case, la cellule retrouve son apparence d’origine, sans aucune couleur de fond. Voir les captures d’écran :

la couleur de remplissage de la cellule sélectionnée change si la case à cocher est cochée, sinon, aucune couleur de remplissage n’est appliquée


Articles associés:

Meilleurs outils de productivité Office

🤖Kutools IA Aide: Révolutionnez Analyse des données grâce à :Exécution intelligente   |  Générez du code|  Créez formules personnalisées  |  Analysez des données et générez des graphiques|  Appelez Fonctions améliorées
Fonctionnalités populaires:Rechercher, mettre en surbrillance ou Marquer les doublons   |  Supprimer les lignes vides   |  Combinez les colonnes ou cellules sans perdre de données   |   Arrondi sans utiliser de formule...
Super RECHERCHEV:RechercheValeurs avec critères multiples  |  RechercheValeurs avec valeurs multiples  |   RechercheValeurs dans plusieurs feuilles   |   Correspondance floue....
Liste déroulante avancée:Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple....
Gestionnaire de colonnes:Ajouter un nombre précis de colonnes|Déplacer des colonnes|Basculer la visibilité des colonnes masquées|Comparer des plages et des colonnes...
Fonctionnalités vedettes:Mise au point de la grille   |  Vue de conception   |Barre de formule améliorée   | Gestionnaire de classeurs et de feuilles   |  Bibliothèque de ressources(Texte automatique)|  Sélecteur de date   |  Consolider les feuilles de calcul  |  Chiffrer/Déchiffrer les cellules   | Envoyer des e-mails par liste   |  Super Filtre   |   Filtre spécial(Filtrer les cellules avec une police en gras/italique/barré...) ...
… et bien plus encore… et plus encore:(,)Supprimer des caractères spécifiques, ...)|   50+Typesde graphiques(, ...)|   40+ Formules pratiques(Calculer l'âge en fonction de la date de naissance, ...)|   19 Outils d’insertion(,Insérer une image depuis un chemin , ...)|   de conversion (Convertir en mots,Conversion de devises, ...)|Fusionner et scinder   (Fusion avancée des lignes,Diviser les cellules , ...)|, ...)   |
Utilisez Kutools dans la langue de votre choix – disponible en anglais, espagnol, allemand, français, chinois et 40+ autres langues !

Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre 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 rend votre travail bien plus facile

  • Activez 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 vous fait économiser des centaines de clics de souris chaque jour !

Tous les compléments Kutools. Un seul installateur

Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.

ExcelWordOutlookTabsPowerPoint
  • Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
  • Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
  • Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
  • Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
  • Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels