ich habe eine recht umfangreiche Excel Tabelle. Über folgendes Makro lösch ich alle Zeilen wenn in Spalte M eine 0 steht. Ich müste das Makro jetzt so verändern das wenn Spalte M = 0 dann sollen nur die Zellen der Spalten B-K gelöscht werden und die darunterstehenden Zellen dann nach oben verschoben werden ???
Application.ScreenUpdating = False
Dim RS As Long
Dim Letzte As Long
Letzte = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
For RS = Letzte To 1 Step -1
If Cells(RS, 13) = 0 Then Rows(RS).Delete
Next
Application.ScreenUpdating = True
Danke und Grüße Rick