Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

masquer le contenu d'une cellule avec une case à cocher

  • Initiateur de la discussion Initiateur de la discussion pat12
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

pat12

XLDnaute Occasionnel
Bonjour,
Je recherche un code VBA ou Macro pour cacher le contenue (texte) d'une cellule à laide d'une case a cocher.
Cocher = texte visible
Décocher = texte masquer
Merci.
 
Re : masquer le contenu d'une cellule ou zone de texte avec une case à cocher

Bonsoir,
Je viens de trouver une partie de la réponse à ma question sur ce post. Sauf que pour moi ce n'est pas la cellule qui doit apparaitre ou disparaitre mais la zone de texte que j'ai appelée zoneproduit dans le fichier joint.
La Macro que j'ai pensée ne fonctionne pas. Savez-vous où est l'erreur ?

Merci pour votre aide.
 

Pièces jointes

Re : masquer le contenu d'une cellule avec une case à cocher

Bonsoir

Tout simplement

Code:
Private Sub CheckBox1_Click()
If CheckBox1.Value = -1 Then ActiveSheet.Shapes("zoneproduit").Visible = True
If CheckBox1.Value = 0 Then ActiveSheet.Shapes("zoneproduit").Visible = False
End Sub

Tu peux aussi réduire ton code ainsi
Code:
Private Sub CheckBox1_Click()
ActiveSheet.Shapes("zoneproduit").Visible = CheckBox1
End Sub
 
Dernière édition:
Re : masquer le contenu d'une cellule avec une case à cocher

Bonsoir et merci pour cette réponse si rapide et "toute simple" effectivement...

Mon erreur était au début, j'avais mal nommé la checkbox (c'est ainsi quand je mixe des infos qui viennent de différents posts...)

Et votre 2ème solution est bien plus courte, je vais l'utiliser.

merci encore pour votre aide.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
212
Réponses
5
Affichages
358
Réponses
1
Affichages
232
Réponses
2
Affichages
169
Réponses
6
Affichages
205
Réponses
10
Affichages
411
Réponses
15
Affichages
469
Réponses
18
Affichages
1 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…