Ja. Verwende dieses Makro und weise es dem Button zu: vba Sub SpaltenEGUmschalten() Columns("E:G").EntireColumn.Hidden = Not Columns("E").EntireColumn.Hidden End Sub So funktio...
Wie blende ich in VBA `Columns("E:G")` ein oder aus und gleichzeitig `Rows("25:30")` gegensätzlich?
Antwort vomJa. Kombiniere beides einfach in einer If-Abfrage, damit beim Umschalten gilt: - **Spalten E:G einblenden** → **Zeilen 25:30 ausblenden** - **Spalten E:G ausblenden** → **Zeilen 25:30 einblenden** ```vba If Columns("E").EntireColumn.Hidden Then Columns("E:G").EntireColumn.Hidden = False Rows("25:30").EntireRow.Hidden = True Else Columns("E:G").EntireColumn.Hidden = True Rows("25:30").EntireRow.Hidden = False End If ``` Kurzform mit Umschalt-Variable: ```vba Dim sichtbar As Boolean sichtbar = Columns("E").EntireColumn.Hidden Columns("E:G").EntireColumn.Hidden = sichtbar Rows("25:30").EntireRow.Hidden = Not sichtbar ``` Dabei bedeutet: - `sichtbar = True` → Spalten werden eingeblendet - gleichzeitig werden die Zeilen ausgeblendet
Verwandte Fragen
Ist dieser Excel-VBA-Code korrekt, um Spalten auszublenden und einen Bereich wieder einzublenden?
Nein. Korrekt ist bei Columns die Angabe von Spaltenbuchstaben oder Spaltennummern als Bereich, nicht "spaltevon:spaltebis" wörtlich. Beispiel: vba With Sheets("Tab1") .Co...
Excel-Makro: Alle Spalten in Tab1!Alle ausblenden, wobei „Alle“ als =INDIREKT(Tab2!B5):INDIREKT(Tab2!B6) definiert ist?
Ja. Das geht per VBA, indem der definierte Name Alle ausgewertet und die darin enthaltenen Spalten ausgeblendet werden. vba Sub SpaltenAusblendenAlle() Dim rng As Range On Error GoTo Fehler Set...