Zeilen löschen

Forumthread: Zeilen löschen

Zeilen löschen

20.09.2006 11:59:08

ingo

In meiner Tabelle möchte ich das automatisch die Zeilen gelöscht werden wenn bestimmte Wörter in einer Spalte stehen.Kann mir jemand weiterhelfen?
Danke Ingo

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zeilen löschen

20.09.2006 12:36:33

IngGi

AW: Zeilen löschen

20.09.2006 12:36:33

IngGi

Hallo Ingo,
folgendes Makro löscht alle Zeilen des aktiven Tabellenblattes, bei denen in Spalte A "raus", "weg" oder "löschen" steht.


Sub Zeilen_loeschen()
Dim rng As Range
For Each rng In Range("A1:A" & Range("A65536").End(xlUp).Row)
Select Case rng
Case "raus", "weg", "löschen"
rng.EntireRow.Delete
Case Else
End Select
Next 'rng
End Sub

Gruß Ingolf

Forumthread: Zeilen löschen

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread