Clever-Excel-Forum

Normale Version: Toogle Button caption bei Klick ändern
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo,

ich habe hier einen ToggleButton der zum Umschalten zwischen 2 Zuständen dient.

Er hat anfangs die Caption "Zustand 1". Wenn er geklickt wird nimmt er "Zustand 2" an.

Problem - wenn man ihn nochmal klickt soll er wieder zurück auf "Zustand 1" springen.


geht das?
Hallo,

das geht so:

Code:
Option Explicit

Private Sub togglebutton1_Click()
   If ToggleButton1.Value = True Then
       ToggleButton1.Caption = "Einblenden"
       Rows("7:7").EntireRow.Hidden = True
       ToggleButton1.TripleState = True
       ToggleButton1.BackColor = &HC000&
   Else
       ToggleButton1.Caption = "Ausblenden"
       Rows("7:7").EntireRow.Hidden = False
       ToggleButton1.TripleState = False
       ToggleButton1.BackColor = &HFF&
   End If
End Sub
Vielen Dank, funktioniert perfekt :)