Alle verborgenen Spalten beim Öffnen einblenden
Schritt-für-Schritt-Anleitung
Um in Excel alle verborgenen Spalten beim Öffnen einer Arbeitsmappe automatisch einzublenden, kannst Du folgenden VBA-Code verwenden:
-
Öffne Excel und die entsprechende Arbeitsmappe.
-
Drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Suche im Projektfenster Deine Arbeitsmappe und klicke darauf.
-
Doppelklicke auf „DieseArbeitsmappe“ (ThisWorkbook).
-
Füge den folgenden Code in das Codefenster ein:
Private Sub Workbook_Open()
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
wks.Cells.EntireColumn.Hidden = False
Next wks
End Sub
-
Schließe den VBA-Editor und speichere die Arbeitsmappe als Excel-Makro-aktivierte Datei (*.xlsm).
-
Schließe und öffne die Arbeitsmappe erneut, um zu testen, ob alle ausgeblendeten Spalten eingeblendet werden.
Häufige Fehler und Lösungen
Alternative Methoden
Eine weitere Möglichkeit, alle ausgeblendeten Spalten in Excel anzuzeigen, ist die Verwendung der Benutzeroberfläche:
- Markiere die Spalten links und rechts der verborgenen Spalten.
- Klicke mit der rechten Maustaste und wähle „Spalten einblenden“.
- Diese Methode kann jedoch zeitaufwendig sein, wenn viele Spalten ausgeblendet sind.
Praktische Beispiele
Wenn Du beispielsweise eine Excel-Datei mit mehreren ausgeblendeten Spalten hast und beim Öffnen alle Spalten einblenden möchtest, verwende den oben genannten VBA-Code. Der Code wird bei jedem Öffnen der Datei ausgeführt und sorgt dafür, dass Du sofort Zugriff auf alle Spalten hast.
Ein weiteres Beispiel ist die Verwendung des Codes, um auch alle ausgeblendeten Zeilen beim Öffnen einzublenden. Du kannst den Code dahingehend anpassen:
Private Sub Workbook_Open()
Dim wks As Worksheet
For Each wks In ThisWorkbook.Worksheets
wks.Cells.EntireColumn.Hidden = False
wks.Cells.EntireRow.Hidden = False
Next wks
End Sub
Tipps für Profis
- Nutze den Code, um nicht nur Spalten, sondern auch alle Zeilen einblenden zu können.
- Verwende Bedingungen im Code, um nur bestimmte Blätter oder Spalten einzublenden.
- Setze den Code in eine allgemeine Modul, wenn Du ihn in mehreren Arbeitsmappen verwenden möchtest.
FAQ: Häufige Fragen
1. Funktioniert der Code auch in Excel 365?
Ja, der VBA-Code funktioniert in allen gängigen Excel-Versionen, einschließlich Excel 365.
2. Was tun, wenn ich den VBA-Editor nicht öffnen kann?
Stelle sicher, dass Du die Entwickler-Optionen in Excel aktiviert hast. Du kannst dies in den Excel-Optionen unter „Menüband anpassen“ tun.
3. Kann ich den Code anpassen, um nur bestimmte Spalten einzublenden?
Ja, Du kannst den Code so anpassen, dass er nur bestimmte Spaltenblenden, indem Du beispielsweise wks.Columns("A:C").Hidden = False verwendest.
4. Wie kann ich alle Zeilen einblenden?
Füge einfach den entsprechenden Code für die Zeilen in die Workbook_Open-Subroutine ein, wie im praktischen Beispiel gezeigt.