---

Hallo,

habe folgende Sortiermethode gewählt und erhalte dabei die Fehlermeldung "Variable nicht definiert" in der vorletzten Zeile bei DataOption1.=xlSortNormal. Worin kann der Fehler liegen?
Danke für  die Hilfe,

Martin

Option Explicit
Option Base 1

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim sheet As Worksheet
Set sheet = ActiveSheet
sheet.Range("A1:B6").Sort Key1:=sheet.Range("A1"), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
End Sub

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hmmm,
mehr als ein Rate mal mit Rosenthal kann ich nicht bringen,
...bei mir läufts

Irgendwelche Blattschutz oder sonstiges Sondereinstellungen vorhanden?
Schon mal den Code in ein neues, 'jungfräuliches' Sheet eingegeben?

------------------
Am Anfang war kein Licht - und Vater blickte Kalt
Miss Brauch

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Martin,

diese Option gibt es erst ab ExcelXP !

Wenn du sie nicht wirklich benötigst, dann lösch sie einfach.

------------------
Gruß
Nepumuk

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP