Private Sub Worksheet_Activate()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = False
Next
DoEvents
With ActiveWindow
.DisplayHeadings = False
.DisplayOutline = False
.DisplayZeros = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
End Sub
Private Sub Worksheet_Deactivate()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = True
Next
DoEvents
With Application
.DisplayFormulaBar = True
.DisplayStatusBar = True
End With
With ActiveWindow
.DisplayHeadings = True
.DisplayOutline = True
.DisplayZeros = True
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
End With
End Sub
Um in Excel die Zahlen und Buchstaben auszublenden, kannst du die folgenden Schritte befolgen:
ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.Einfügen > Modul.Code einfügen: Kopiere den folgenden VBA-Code und füge ihn in das Modul ein:
Private Sub Worksheet_Activate()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = False
Next
DoEvents
With ActiveWindow
.DisplayHeadings = False
.DisplayOutline = False
.DisplayZeros = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With
End Sub
Private Sub Worksheet_Deactivate()
Dim cb As CommandBar
For Each cb In Application.CommandBars
cb.Enabled = True
Next
DoEvents
With Application
.DisplayFormulaBar = True
.DisplayStatusBar = True
End With
With ActiveWindow
.DisplayHeadings = True
.DisplayOutline = True
.DisplayZeros = True
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
End With
End SubFehler: Der VBA-Code funktioniert nicht.
Lösung: Stelle sicher, dass die Makros in Excel aktiviert sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen und aktiviere die Makros.
Fehler: Spaltenüberschriften werden nicht ausgeblendet.
Lösung: Überprüfe, ob du den Code im richtigen Arbeitsblatt-Modul eingefügt hast. Der Code muss im Modul des Arbeitsblatts platziert werden, wo du die Änderungen sehen möchtest.
Falls du keine VBA-Programmierung verwenden möchtest, kannst du die folgenden Methoden ausprobieren:
Zellen formatieren: Du kannst die Schriftfarbe der Zellen auf die Hintergrundfarbe ändern, um den Text zu "verstecken". Wähle die Zellen aus, gehe zu Start > Schriftart > Schriftfarbe und wähle die Hintergrundfarbe.
Filter verwenden: Du kannst die Filteroptionen in Excel verwenden, um bestimmte Werte auszublenden. Klicke auf die Spaltenüberschrift, wähle Filter und deaktiviere die Sichtbarkeit der Zahlen oder Buchstaben.
Zahlen statt Buchstaben anzeigen: Wenn du die Spaltenüberschrift von Buchstaben auf Zahlen ändern möchtest, gehe zu Start > Format > Spaltenbreite und passe die Breite an, um die Zahlen sichtbar zu machen.
Text und Zahlen in einer Zelle: Du kannst auch Text mit Zahlen kombinieren, indem du die Funktion =TEXT(A1;"Text") verwendest, um nur den Text anzuzeigen, während die Zahlen weiterhin im Hintergrund bleiben.
1. Wie kann ich nur die Zahlen ausblenden?
Um nur die Zahlen auszublenden, kannst du den entsprechenden VBA-Code anpassen und nur .DisplayZeros = False verwenden.
2. Funktioniert das auch in Excel Online?
Leider ist die Verwendung von VBA in Excel Online nicht möglich. Du musst die Desktop-Version verwenden, um diese Funktionen zu nutzen.
3. Kann ich auch die Zeilenbeschriftungen ausblenden?
Ja, du kannst auch die Zeilenbeschriftungen ausblenden, indem du im VBA-Code .DisplayHeadings = False verwendest, was bereits im Beispiel enthalten ist.