Abbruch mit Toglle-Button
22.10.2012 21:11:34
Rainer
wollte mir mit einem Toggle-Button abwechseln Spalte G-K bzw. Spalte L-P ausblenden und habe mit der Makroaufzeichnung für den ersten Bereich folgenden Code erhalten:
Columns("G:K").Select
Selection.EntireColumn.Hidden = True
Nun wollte ich meinen Toggle-Button einrichten und hatte dies laienhaft so versucht:Private Sub ToggleButton1_Click()
If ToggleButton1.Value = False Then
ToggleButton1.Value = True
Columns("L:P").Select
Selection.EntireColumn.Hidden = False
Columns("G:K").Select
Selection.EntireColumn.Hidden = True
ToggleButton1.Caption = "Kalk1"
Else
ToggleButton1.Value = False
Columns("G:K").Select
Selection.EntireColumn.Hidden = False
Columns("L:P").Select
Selection.EntireColumn.Hidden = True
ToggleButton1.Caption = "Kalk2"
End If
End Sub
Damit bricht mein Makro jedoch mit der Fehlermeldung "Laufzeitfehler" ab.Was ist falsch?
Gruß Rainer