Supportnet / Forum / Tabellenkalkulation
Spalten ausblenden
Frage
Hallo zusammen,
Hab folgendes Problem. Ich möchte mit einem Button einen bestimmten Zellenbereich ausblenden.
Jetzt weiß ich nicht genau wie ich die Zeile schreiben soll.
Columns("AL:p - 52").Select
Kann mir jemand behilflich sein?
Gruß
Johannes
_______________
Private Sub CommandButton2_Click()
Dim p As Integer
For p = 35 To 195
If Cells(1, p).Value = "Heute" Then
Columns("AL: p - 52").Select
Selection.EntireColumn.Hidden = True
End If
Next
End Sub
Antwort 1 von M.O.
Hallo,
das kannst du z.B. so lösen:
Du solltest aber deine Schleife überarbeiten, da das Ergebnis von p -52 teileweiseat kleiner 1 wird, was zu einem Fehler führt, da die kleinste mögliche Zahl für Zeilen und Spalten ist 1.
Gruß
M.O.
das kannst du z.B. so lösen:
Range(Columns("AL"), Columns(p-52)).EntireColumn.Hidden = TrueDu solltest aber deine Schleife überarbeiten, da das Ergebnis von p -52 teileweiseat kleiner 1 wird, was zu einem Fehler führt, da die kleinste mögliche Zahl für Zeilen und Spalten ist 1.
Gruß
M.O.
Antwort 2 von jockel01
Super Danke dir.