Afficher ou pas texte dans une cellule commandé par bouton

bonjour à tous je cherche a afficher la valeur d'une cellule en cliquant sur un bouton ou la masquer avec le même bouton en jouant sur le "format de cellule /police /couleur" blanc pour masquer ou automatique pour afficher.

cordialement.

Affecte ceci à ton bouton

Sub masquer()
    With Range("C5:D6").Font
        If Range("C5:D6").Font.Color = RGB(255, 255, 255) Then
            .ColorIndex = xlAutomatic
            .TintAndShade = 0
        Else
            .ThemeColor = xlThemeColorDark1
            .TintAndShade = 0
        End If
    End With
End Sub

bonjour et merci pour la réponse rapide mais cela ne fonctionne pas je pence ne pas mis prendre comme il se doit.

sur une feuille excel je créais un bouton commande sur le quel je colle le tout et erreur????

sur la ligne: .ThemeColor = xlThemeColorDark1

cordialement