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 ?
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