Office: Falls im Feld XY eine NULL dann ganze Zeile löschen

Hallo alle Zusammen,

ich habe eine Frage. Kann man mit Ecxel folgendes realisieren:

das Feld E hat ab und zu eine Zahl 0 drin. Wenn die Zahl in dem Feld E 0 ist soll die ganze Zeile die dazu gehört gelöscht werden.

Ist das möglich?

Vielen Dank im Voraus.

Robby

 

Hallo!

Entweder du nutzt dafür den Autofilter oder du lässt es per VBA erledigen:

Code:

Sub Löschen()
Const ErsteZeile = 3  'hier anpassen
Dim LetzteZeile As Long, i As Long
LetzteZeile = Cells(Rows.Count, 5).End(xlUp).Row
For i = LetzteZeile To ErsteZeile Step -1
If Cells(i, 5) = 0 Then Rows(i).Delete Shift:=xlShiftUp
Next i
End Sub

Eine weitere Möglichkeit findest du hier.

 

Vielen Dank. Es hat funktioniert!