Spalte hidden Code falsch?
21.11.2012 11:07:00
Arthur
Wenn ich meinen Code ausführe dann blendet sich nur Spalte B aus.
Aber C soll sich auch ausblenden, was ist falsch?
Ich habe keine VBA Kenntnisse..:
Private Sub ToggleButton1_Click()
If ToggleButton1 = True Then
Columns("B:C").EntireColumns.Hidden = True
ToggleButton1.Caption = "LB einblenden"
ToggleButton1.BackColor = RGB(204, 0, 0)
Else
Columns("B:C").EntireColumns.Hidden = False
ToggleButton1.Caption = "LB ausblenden"
ToggleButton1.BackColor = RGB(204, 0, 0)
End If
End Sub
Gruss
Arthur
Anzeige