Hallo,
ich wollte ganz gern über ein Formularsteuerelement über ein Modul mit einem Haken in einer Checkbox bestimmte Spalten eines Tabellenblatts ein und ausblenden. Beim Setzen des Hakens sollen diese ausgeblendet werden und beim rausnehmen des Hakens wieder eingeblendet werden. Problem ist, dass VBA die CheckBox irgendwie nicht finden kann? Habe überprüft, die CheckBox heißt "Kontrollkästchen 5". Tabellenblatt heißt Reportseite_1.
Ist es möglich das ganze mit einem Formularsteuerelemten zu lösen, würde ungern auf ActiveX-Element umsteigen.
Hier der Code:
Sub Ausblenden1()
If CheckBox5.Value = True Then
With Worksheets("Reportseite_1")
Range(.Columns(10), .Columns(23)).EntireColumn.Hidden = True
End With
Else
With Worksheets("Reportseite_1")
Range(.Columns(10), .Columns(23)).EntireColumn.Hidden = False
End With
End If
End Sub
LG Till
|