Direkt zum Inhalt

Wie lösche ich die gesamte Zeile, wenn die Zelle in Excel Null enthält?

Manchmal möchten Sie die gesamte Zeile löschen, wenn die Zelle in Excel Null enthält, und Sie können sie einzeln löschen, wenn einige davon vorhanden sind. Aber wie wäre es, wenn Hunderte von Zeilen mit Null entfernt werden müssten? Sie können einen der folgenden kniffligen Wege wählen, um das Problem zu lösen.

Zeile löschen, wenn die Zelle mit der Filterfunktion in Excel Null enthält
Zeile löschen, wenn die Zelle mit VBA in Excel Null enthält
Zeile löschen, wenn die Zelle mit Kutools for Excel Null enthält


Zeile löschen, wenn die Zelle mit der Filterfunktion in Excel Null enthält

Mit der Filterfunktion können Sie alle Zeilen basierend auf den Nullwerten in einer bestimmten Spalte herausfiltern und später alle sichtbaren Zeilen löschen. Bitte gehen Sie wie folgt vor.

1. Wählen Sie die Spaltenzellen aus, die die Nullwerte enthalten, auf deren Grundlage Sie die gesamten Zeilen löschen möchten, und klicken Sie dann auf Datum > Filter. Siehe Screenshot:

2. Anschließend wird in der ersten Zelle der ausgewählten Spalte ein Dropdown-Pfeil angezeigt. Klicken Sie auf den Pfeil und wählen Sie dann aus Zahlenfilter > Equals aus der Dropdown-Liste.

doc löschen, wenn Null 1

3. In dem Benutzerdefinierter AutoFilter Dialogfeld, Nummer eingeben 0 in das Textfeld wie unten gezeigt, und klicken Sie dann auf OK .

doc löschen, wenn Null 1

4. Dann werden alle Nullwertzellen in dieser bestimmten Spalte herausgefiltert. Bitte wählen Sie alle sichtbaren Zellen im Filterbereich aus und klicken Sie mit der rechten Maustaste darauf Zeilen löschen aus dem Kontextmenü. Klicken Sie im Eingabeaufforderungsfeld auf OK Taste. Siehe Screenshot:

doc löschen, wenn Null 1

5. Jetzt werden alle sichtbaren Zeilen gelöscht. Sie können klicken Datum > Filter erneut, um alle Daten ohne Nullwertzellen anzuzeigen. Siehe Screenshot:

doc löschen, wenn Null 1


Löschen Sie einfach alle Zeilen, wenn in Excel in einem bestimmten Bereich Nullwerte vorhanden sind:

Kutools für Excel Wählen Sie Bestimmte Zellen aus Mit dem Dienstprogramm können Sie ganz einfach ganze Zeilen auswählen, wenn in einem bestimmten Bereich Nullwerte vorhanden sind. Anschließend können Sie alle ausgewählten Zeilen schnell und fehlerfrei manuell löschen.
Laden Sie es jetzt herunter und probieren Sie es aus! (30 Tage kostenloser Trail)


Zeile löschen, wenn die Zelle mit VBA in Excel Null enthält

Dieser Abschnitt zeigt Ihnen die VBA-Methode zum Löschen aller Zeilen, wenn in einer bestimmten Spalte in Excel Nullwerte vorhanden sind.

1. Drücken Sie Alt + F11 Tasten gleichzeitig, um die anzuzeigen Microsoft Visual Basic für Applikationen Fenster.

2. Klicken Sie im Fenster Microsoft Visual Basic für Applikationen auf Insert > ModulKopieren Sie dann den folgenden VBA-Code und fügen Sie ihn in das Modulfenster ein.

VBA: Löschen Sie ganze Zeilen, wenn in einem bestimmten Spaltenbereich eines Arbeitsblatts ein Nullwert vorhanden ist

Sub DeleteZeroRow () 'Updateby20140616 Dim Rng As Range Dim WorkRng As Range On Error Resume Weiter xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8 ) Application.ScreenUpdating = False Do Set Rng = WorkRng.Find ("0", LookIn: = xlValues) Wenn Rng nichts ist, dann ist Rng.EntireRow.Delete End If Loop, wenn Rng nichts ist Application.ScreenUpdating = True End Sub

3. Drücken Sie die Taste F5 Schlüssel zum Ausführen des Codes beim Auftauchen KutoolsforExcel Wählen Sie im Dialogfeld den Spaltenbereich aus, in dem Sie ganze Zeilen basierend auf den darin enthaltenen Nullwerten löschen möchten, und klicken Sie dann auf OK Taste. Siehe Screenshot:

doc löschen, wenn Null 1

Dann werden alle Zeilen, die auf den Nullwerten im angegebenen Spaltenbereich basieren, sofort gelöscht.

doc löschen, wenn Null 1


Zeile löschen, wenn die Zelle mit Kutools for Excel Null enthält

Für viele Excel-Benutzer ist die Verwendung von VBA-Code gefährlich, um Daten in Excel zu entfernen. Wenn Sie dem VBA-Code nicht genau vertrauen, empfehlen wir Ihnen, hier den zu versuchen Wählen Sie Bestimmte Zellen aus Nutzen von Kutools for Excel.

Vor der Bewerbung Kutools for Excel, Bitte Laden Sie es zuerst herunter und installieren Sie es.

1. Wählen Sie den Spaltenbereich aus, in dem Sie ganze Zeilen basierend auf den darin enthaltenen Nullwerten entfernen möchten, und klicken Sie dann auf Kutoolen > Auswählen > Wählen Sie Bestimmte Zellen aus. Siehe Screenshot:

2. In dem Wählen Sie Bestimmte Zellen aus Dialog müssen Sie:

(1) Wählen Sie die Ganze Reihe Option in der Auswahltyp .

(2) Wählen Sie Equals in der ersten Spezifischer Typ Dropdown-Liste, dann geben Sie die Nummer ein 0 in das Textfeld.

(3) Klicken Sie auf OK .

3. Ein Dialogfeld wird angezeigt, in dem Sie erfahren, wie viele Zeilen ausgewählt wurden. Klicken Sie auf OK Taste. Jetzt werden alle Zeilen mit den Nullwerten im angegebenen Spaltenbereich ausgewählt. Klicken Sie mit der rechten Maustaste auf eine ausgewählte Zeile und klicken Sie dann auf Löschen im Kontextmenü. Siehe Screenshot:

doc löschen, wenn Null 1

Jetzt werden alle Zeilen mit den Nullwerten in der angegebenen Spalte sofort gelöscht. Siehe Screenshot:

doc löschen, wenn Null 1

  Wenn Sie eine kostenlose Testversion (30 Tage) dieses Dienstprogramms wünschen, Bitte klicken Sie, um es herunterzuladenund wenden Sie dann die Operation gemäß den obigen Schritten an.


Zeile löschen, wenn die Zelle mit Kutools for Excel Null enthält


Relative Artikel:

Beste Office-Produktivitätstools

🤖 Kutools KI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Erstellen Sie benutzerdefinierte Formeln  |  Analysieren Sie Daten und erstellen Sie Diagramme  |  Rufen Sie Kutools-Funktionen auf...
Beliebte Funktionen: Suchen, markieren oder identifizieren Sie Duplikate   |  Leere Zeilen löschen   |  Kombinieren Sie Spalten oder Zellen, ohne Daten zu verlieren   |   Runde ohne Formel ...
Super-Lookup: VLookup mit mehreren Kriterien    VLookup mit mehreren Werten  |   VLookup über mehrere Blätter hinweg   |   Unscharfe Suche ....
Erweiterte Dropdown-Liste: Erstellen Sie schnell eine Dropdown-Liste   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Fügen Sie eine bestimmte Anzahl von Spalten hinzu  |  Spalten verschieben  |  Schalten Sie den Sichtbarkeitsstatus ausgeblendeter Spalten um  |  Vergleichen Sie Bereiche und Spalten ...
Ausgewählte Funktionen: Rasterfokus   |  Designansicht   |   Große Formelleiste    Arbeitsmappen- und Blattmanager   |  Ressourcen (Autotext)   |  Datumsauswahl   |  Arbeitsblätter kombinieren   |  Zellen verschlüsseln/entschlüsseln    Senden Sie E-Mails nach Liste   |  Superfilter   |   Spezialfilter (Filter fett/kursiv/durchgestrichen...) ...
Top 15 Toolsets12 Text Tools (Text hinzufügen, Zeichen entfernen, ...)   |   50+ Chart Typen (Gantt-Diagramm, ...)   |   40+ Praktisch Formeln (Berechnen Sie das Alter basierend auf dem Geburtstag, ...)   |   19 Einfügen Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Umwandlung (Conversion) Tools (Zahlen zu Wörtern, Currency Conversion, ...)   |   7 Zusammenführen & Teilen Tools (Erweiterte Zeilen kombinieren, Zellen teilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...

Beschreibung


Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
Comments (15)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Despues de utilizar subtotal Como hacer para eliminar las filas involucradas que en el subtotal es igual a 0?
This comment was minimized by the moderator on the site
Insert this in VB new module.
This is with InputBox to delete row which contains that word.

Attribute VB_Name = "FindDelRowByWord"
Sub FindDelRow()
'Updateby20140616
Dim Rng As Range
Dim WorkRng As Range
Dim xRep As String
On Error Resume Next
xTitleId = "ZOK Tools"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xRep = Application.InputBox("word to delete Row:", "ZOK Tools", , , , , 2)
Application.ScreenUpdating = False
Do
Set Rng = WorkRng.Find(xRep, LookIn:=xlValues)
If Not Rng Is Nothing Then
Rng.EntireRow.Delete
End If
Loop While Not Rng Is Nothing
Application.ScreenUpdating = True
End Sub
This comment was minimized by the moderator on the site
WHAT IF you have a big sheet, and there are rows you want to keep, and others rows that contain certain key words and delete those? the kutools work for me but for one key word that many rows have that key word, the rows were deleted, i just want to have multiple key words to do the same? does this work for the code above?
This comment was minimized by the moderator on the site
Good Day,
Kutools can deal with two key words at the same time. You need to enable its second condition with "And" or "Or". Hope I can help.
This comment was minimized by the moderator on the site
This didn't work for me. It changed all values in my chosen column and the adjacent column to zeros. I must be doing something wrong!
This comment was minimized by the moderator on the site
Hi Sheri,
The code works well in my case. Which Excel verson do you use?
This comment was minimized by the moderator on the site
Hi Crystal. I posted this two years ago so I’m guessing I figured it out. But thanks for the reply.
This comment was minimized by the moderator on the site
Hi dears , I need a code to hide the rows which have the value=0 on the column "N" in the sheet 1. The value of the column "N" will change when update the details on the Sheet 2. that's the time need to un-hide the row. is this possible to do this with Excel formula(without macro and Excel Filters).
This comment was minimized by the moderator on the site
modified for my purpose--thank you for your help: Sub DeleteZeroRow() Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "" Application.Calculation = xlManual MsgBox "Set the range you want to remove the unused 0 quantity rows from" Set WorkRng = Application.InputBox("Range", xTitleId, "FG93:FG500", Type:=8) Application.ScreenUpdating = False Sheets("ENTRY").Select Do Set Rng = WorkRng.Find("0", LookIn:=xlValues) If Not Rng Is Nothing Then Rng.EntireRow.Delete End If Loop While Not Rng Is Nothing Application.ScreenUpdating = True Range("FF92").Select Selection.End(xlDown).Select MsgBox "Removed 0's ROWS from column FG--calculating now--please wait" Application.Calculation = xlAutomatic End Sub
This comment was minimized by the moderator on the site
I modified the below code to work for me. This deleted every row in column C that had "Delete" in the cell of column C. Sub Delete_DeleteRows() Set WorkRng = Range("C2:C12000") Application.ScreenUpdating = False Do Set Rng = WorkRng.Find("Delete", LookIn:=xlValues) If Not Rng Is Nothing Then Rng.EntireRow.Delete End If Loop While Not Rng Is Nothing Application.ScreenUpdating = True End Sub
This comment was minimized by the moderator on the site
Hi,
its worked for me, thanks a lot.
if I have multiple sheets? how i can run the script 1 time for all the sheets?
This comment was minimized by the moderator on the site
thanks for the response, worked for me
This comment was minimized by the moderator on the site
I modified the above code to work for me. I wanted to delete every row that had "Delete" in row C. Sub Delete_DeleteRows() Set WorkRng = Range("C2:C12000") Application.ScreenUpdating = False Do Set Rng = WorkRng.Find("Delete", LookIn:=xlValues) If Not Rng Is Nothing Then Rng.EntireRow.Delete End If Loop While Not Rng Is Nothing Application.ScreenUpdating = True End Sub
This comment was minimized by the moderator on the site
Your VB code doesn't work. It deletes all rows with a Zero in the 10s position. I hope no one actually uses this as they will delete data...
This comment was minimized by the moderator on the site
This was a life saver!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations