Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
800to804
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
800to804
800to804
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zeilen löschen

Zeilen löschen
20.09.2006 09: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
Anzeige
AW: Zeilen löschen
20.09.2006 10: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
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige