Objekt erforderlich

Ich bin noch nicht so erfahren mit dem Programmieren von Makros. Deshalb habe ich auch keine Ahnung, weshalb mir folgender Quellcode die Fehlermeldung "Laufzeitfehler '424' Objekt erforderlich" gibt.
Ausschnitt aus dem Quellcode:

If Range("D16") = Range("D18") Then
[b16:i18;l16:l18].Sort Key1:=Range("L16"), Order1:=xlDescending, Header:=xlGuess
Exit Sub
End If

Im Debug-Modus wird die Zeile
"[b16:i18;l16:l18].Sort Key1:=Range("L16"), Order1:=xlDescending, Header:=xlGuess"
hervorgehoben.

Kann mir jemand sagen, was ich falsch mache?

Vielen Dank

Gruss Marco