Herbers Excel-Forum - das Archiv

Zeilen löschen bist "Armin"

Bild

Betrifft: Zeilen löschen bist "Armin"
von: Melanie
Geschrieben am: 19.11.2003 09:22:33
Hallo,

ich hätte mal folgende Frage: Ich bekomme monatlich eine Liste. Diese Liste hat eine feste Kopfzeile. Dieser Kopf (bestehend aus etwa 5 Zeilen) soll nicht gelöscht werden. Darunter kommen aber viele Zeilen, die ich immer löschen muss, bis zu der Zeile bei der in der Spalte A "Armin" steht. Das soll meine erste Zeile unter der Kopfzeile sein. Die Zeilen darüber sollen gelöscht werden. Wie könnte so ein Makro aussehen?

Über Hilfe würde ich mich sehr freunen.

Gruß

Melanie

Bild

Betrifft: AW: Zeilen löschen bist "Armin"
von: Torsten
Geschrieben am: 19.11.2003 09:35:09
Hi Melanie, probiere doch mal folgende Makro:



Sub löschen()
Dim i
i = 5
While Cells(i, 1).Value <> "armin"
rows(i).Delete
Wend
End Sub



Es wird immer die 1. Zelle einer Zeile ab der 5. Zeile auf Armin getestet, ansosnte wird die Zeile gelöscht.

Gruß Torsten
Bild

Betrifft: AW: Zeilen löschen bist "Armin"
von: Holger Levetzow
Geschrieben am: 19.11.2003 09:35:18
die könnte so aussehen:


Sub Makro1()
z = 6
Do While Cells(z, 1) <> "Armin"
z = z + 1
Loop
Rows("6:" & z - 1).Delete Shift:=xlUp
End Sub


Holger
Bild
Excel-Beispiele zum Thema " Zeilen löschen bist "Armin""
Zeilenhöhe in cm festlegen Summe gefilterter Zeilen
Zeilenumbruch Leere Zeilen löschen
Spalten/Zeilen aus- und einblenden Zeilenumbruch in Formel erzwingen
Zeilen und Spalten über ein Drehfeld ein- und ausblenden Alle Kopf-/Fußzeilen-Festlegungen löschen
Fußzeilen beim Öffnen eintragen Zellinhalte zeilenweise sortieren