in einem Tabellenblatt mit 1500 Zeilen von Artikelen und darunter Vorratsangaben in der Spalte „F“ steht vielfach eine 0 und diese Zeile habe ich nicht nötig.
Die Zeilen habe ich bisher immer mit der Hand entfernt aber da ich diese Blatt jede Woche bekomme ist es viel Arbeit von Hand.
Gibt es ein Macro oder sonst eine Möglichkeit um die ganzen Zeilen zu entfernen wenn in der Spalte „F“ eine 0 steht?
Vielen Dank im voraus,
Edgar
Sortieren…
Hallo,
sicher kannman auch ein Makro schreiben, das die Zeilen in der Spalte F prüft und wenn dort eine 0 steht, die Zeile löscht.
Mir erscheint jedoch einfacher, die Tabelle nach der Spalte F zu sortieren. Dann hast Du alle Zeilen mit 0 untereinander und kannst sie zusammen markieren und auf einmal löschen. Dazu klicke im Menu „Daten“ auf „Sortieren…“, nachdem Du vorher den Cursor in eine Zelle innerhalb der Tabelle gesetzt hast.
Durch erneutes Sortieren stellst du die alte Sortierung wieder her, das wars…
Gruß
Wolfgang
hi Edgar,
die methode von Wolfgang ist die einfachste und schnellste, hier trotzdem noch der Code für ein Makro:
Sub leerezeilelöschen()
For i = 1 To 1500 'Zeile 1 bis 1500 durchsuchen'
If Cells(i, 6).Value = 0 Then 'Wenn in Spalte 6 bzw. F der'
'Wert 0 steht'
Rows(i).Delete 'lösche die zeile'
End If
Next
End Sub
Bye Micha