Wie kann man Zeilen mit leeren Zellen in einer Spalte in Excel automatisch ausblenden?
Wenn Sie in Excel ein Dataset mit leeren Zellen in einer Spalte haben, möchten Sie möglicherweise die Zeilen, die diese Leerstellen enthalten, automatisch ausblenden. In dieser Anleitung zeigen wir Ihnen, wie Sie Zeilen mit leeren Zellen mithilfe eines einfachen VBA-Codes automatisch ausblenden können, um Ihre Daten einfacher zu verwalten, ohne Zeilen manuell filtern oder ausblenden zu müssen.
Verwenden Sie VBA-Code, um Zeilen automatisch auszublenden, wenn leere Zellen in einer Spalte vorhanden sind
Der folgende Code kann Ihnen helfen, alle Zeilen mit leeren Zellen in einer bestimmten Spalte auf einmal auszublenden. Wenn Sie den Inhalt einer Zelle in dieser Spalte löschen, werden die Zeilen ebenfalls automatisch ausgeblendet. Gehen Sie wie folgt vor:
1. Klicken Sie mit der rechten Maustaste auf das Arbeitsblatt-Tab, in dem Sie Zeilen mit leeren Zellen in einer Spalte automatisch ausblenden möchten, und wählen Sie dann "Code anzeigen" aus dem Kontextmenü. Kopieren Sie im erscheinenden Fenster "Microsoft Visual Basic for Applications" den folgenden Code und fügen Sie ihn in das leere "Modul" ein:
VBA-Code: Automatisches Ausblenden von Zeilen bei leeren Zellen in einer Spalte:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
Dim xRg As Range
Application.ScreenUpdating = False
For Each xRg In Range("A1:A20")
If xRg.Value = "" Then
xRg.EntireRow.Hidden = True
Else
xRg.EntireRow.Hidden = False
End If
Next xRg
Application.ScreenUpdating = True
End Sub
Hinweis: Im obigen Code ist "A1:A20" der Datenbereich, der die leeren Zellen enthält, die Sie automatisch ausblenden möchten.
2. Gehen Sie nun zurück zum Arbeitsblatt. Wenn Sie auf eine beliebige Zelle doppelklicken und die Eingabetaste drücken, werden die Zeilen, die leere Zellen in Spalte A enthalten, sofort ausgeblendet. Zusätzlich werden die Zeilen automatisch ausgeblendet, wenn Sie den Inhalt einer Zelle im angegebenen Bereich von Spalte A löschen.
Die besten Office-Produktivitätstools
Steigern Sie Ihre Excel-Kompetenz mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen, um Ihre Produktivität zu steigern und Zeit zu sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Reiter-Oberfläche in Office und macht Ihre Arbeit so viel einfacher
- Aktivieren Sie die Bearbeitung und das Lesen in Reitern in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Reitern desselben Fensters, anstatt in neuen Fenstern.
- Steigert Ihre Produktivität um50 % und reduziert täglich Hunderte von Mausklicks!