Bereich löschen - aber wie ?
19.12.2006 16:11:04
Jutta
ich filtere eine Tabelle und will dann den gefilterten Bereich löschen, natürlich soll die Kopfzeile stehen bleiben :))
Aufgezeichnet schaut das so aus:
Sub Loeschen()
Rows("1:1").Select
Selection.AutoFilter
Selection.AutoFilter Field:=5, Criteria1:="=CP", Operator:=xlOr, _
Criteria2:="=PG"
Rows("3386:3897").Select
Selection.Delete Shift:=xlUp
ActiveSheet.ShowAllData
Range("A1").Select
ActiveWorkbook.Save
End Sub
Wie um schreibt man diesen gefilterten Bereich ?
Rows("3386:3897").Select
Es sind ja nicht immer genau diese Zeilen...
Gruß
Jutta