ich bekomme ein Laufzeitfehler 424 - Objekt erforderlich.
Es wird gleichzeitig "hid = ToggleButton1.Value" gelb makiert.
Ich setze den u.g. Code in eine Tabelle.
Wo ist der Fehler?
Gruß Wrobel
Private Sub CommandButton1_Click()
Dim sh As Worksheet
Dim hid As Boolean
hid = ToggleButton1.Value
ToggleButton1.Caption = IIf(hid, "Unsichtbar", "Sichtbar")
For Each sh In ThisWorkbook.Worksheets
With sh
If .Index = 3 Or (.Index >= 7 And .Index