Spalten erst unterhalb Zeile x ausblenden?
07.11.2023 07:29:32
Nordic
Auf meinem Tabellenblatt blende ich bei Bedarf bestimmt Spalten aus.
Beispiel:
Private Sub tglBtn1_Click()
With tglBtn1
.BackColor = IIf(.Value = False, &H80000002, &H80000002)
End With
If tglBtn1 = True Then
Columns("D:H").EntireColumn.Hidden = False
Else
Columns("D:H").EntireColumn.Hidden = True
End If
End Sub
Nun habe ich In Zeille 1 bis 4, Spalte D bis H Angaben stehen die derzeit logischerweise mit ausgeblendet werden.
Wie kann ich das umgehen, dass mir die Zeile 1- 4 erhalten bleibt?
Grüße und einen guten Start in die neue Woche, Nordic (Uwe)
Anzeige