In diesem Beispiel wird der Bereich "A1:C20" in Sheet1 sortiert. "A1" ist der erste Sortierschlüssel, "B1" ist der zweite Sortierschlüssel. Es wird zeilenweise in aufsteigender Reihenfolge sortiert, und es gibt keine Überschriften.
Worksheets("Sheet1").Range("A1:C20").Sort _ Key1:=Worksheets("Sheet1").Range("A1"), _ Key2:=Worksheets("Sheet1").Range("B1")
In diesem Beispiel wird der Bereich, der Zelle "A1" (der aktive Bereich) in Sheet1 enthält, nach den Daten der ersten Spalte sortiert, wobei eine vorhandene Überschriftenzeile automatisch verwendet wird. Die Sort-Methode legt die aktive Region automatisch fest.
Worksheets("Sheet1").Range("A1").Sort _ Key1:=Worksheets("Sheet1").Columns("A"), _ Header:=xlGuess