Auswählen und löschen
13.02.2004 10:24:46
Paul
ich versuche gerade, mittels eines Macros alle Zeilen auszuwählen und auch gleich zu löschen (die Zeilen, nicht nur den Inhalt), bei denen in der Spalte O der Wert 1 enthalten ist. Nachher will ich das Ganze noch nach der Spalte N sortieren.
Das Sortieren klappt gut (Macros aufzeichenen ist nicht so schwierig)! Leider weiss ich aber nicht, wie ich die Zeilen auswählen und löschen kann.
Hier ist mein Code:
If Column.O = 1 Then
Range("B16:O500").Select
Selection.ClearRows
End If
Range("B16:O500").Select
Selection.Sort Key1:=Range("N16"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("A15").Select
Könnte mir da jemand helfen?
Besten Dank!
Gruss