Hallo,
ja, z.B. indem du per Makro die Schriftfarbe im entsprechenden Bereich auf die Hintergrundfarbe der Zelle setzt.
Hier ein kleines Beispiel für den Bereich A1:B1
Hintergrundfarbe der Zellen ist standard/weiß
Schriftfarbe ist schwarz
Lege dir eine Befehlsschaltfläche aus den ActiveX-Steuerelemente auf dein Tabellenblatt (CommandButton)
1. Rechtsklick auf den so eingefügten Commandbutton - Eigenschaften. Dort gibt es die Eigenschaft Caption. Dort CommandButton1 ändern in Ausblenden.
2. Eigenschaftenfenster schließen
3. Doppelklick auf den CommandButton. Im Codefenster des CommandButton zwischen CommandButton1_Click und End Sub folgenden Code einfügen:
If CommandButton1.Caption = "Ausblenden" Then
Range("A1:B1").Font.Color = vbWhite
CommandButton1.Caption = "Einblenden"
ElseIf CommandButton1.Caption = "Einblenden" Then
Range("A1:B1").Font.Color = vbBlack
CommandButton1.Caption = "Ausblenden"
End If
4. CodeFenster schließen und im Tabellenblatt den Entwurfsmodus für den CommandButton verlassen durch Klick auf Entwurfsmodus
5. Testen
Gruß Werner
|