Herbers Excel-Forum - das Archiv
Zeilen löschen bist "Armin"
- Zeilen löschen bist "Armin" von Melanie vom 19.11.2003 09:22:33
- AW: Zeilen löschen bist "Armin" - von Torsten am 19.11.2003 09:35:09
- AW: Zeilen löschen bist "Armin" - von Holger Levetzow am 19.11.2003 09:35:18
- AW: Zeilen löschen bist "Armin" - von Torsten am 19.11.2003 09:35:09
 |
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
 |
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
|
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
| |