Variablen Bereiche löschen

Forumthread: Variablen Bereiche löschen
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Variablen Bereiche löschen

17.06.2008 13:42:35

Oliver

Hallo
Auf dem Server ist die Beispieldat: https://www.herber.de/bbs/user/53158.xls
In der Realität ist die Liste länger, rund 250 Seiten gedruckt.
Folgendes Problem soll behoben werden:
Der Bereich unterhalb des Kalenders soll gelöscht werden (nicht nur der Inhalt, sondern alle Zeilen)
Anhaltspunkte für eine Markiereung können zum einen der Gelbe Hintergrund am Anfang der Zusammenfassung und die geöffnete Klammer am Beginn des Folgesatzes.
Excel soll mittels eines Makros die Zeilen nach den gelben Hintergründen durchsuchen und dann den Bereich bis zur Zeile oberhalb der Zeile mit der Klammer markieren und löschen.
Wie gehts?
Danke für Tipps.
Olli

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Variablen Bereiche löschen

17.06.2008 13:55:00

Reinhard
AW: Variablen Bereiche löschen

17.06.2008 16:38:00

Oliver

AW: Variablen Bereiche löschen

17.06.2008 13:55:00

Reinhard

Hi Oliver,
probiers mal so:


Option Explicit
Sub tt()
Dim Zei As Long
For Zei = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
While Cells(Zei, 1).Interior.ColorIndex  36
Cells(Zei, 1).EntireRow.Delete
Zei = Zei - 1
Wend
While Left(Cells(Zei, 1), 1)  "("
Zei = Zei - 1
Wend
Next Zei
End Sub

Gruß
Reinhard