'1004': “Le genre de référence n'est pas valide.”

Je suis en train de trier une plage de cellules dans une feuille séparée.
Cependant, je reçois ce message:

 '1004': "The sort reference is not valid. Make sure it's within the data you want to sort, and the first Sort By box isn't the same or blank. 

J'ai vérifié les gammes et tous, ils existent et fonctionnent.

Le code est ci-dessous:

Dim EmpBRange As String

EmpBRange = Sheets("EmployeeData").Cells(Cells.Rows.Count, "B").End(xlUp).Row

Worksheets("EmployeeData").Range("K3:K" & EmpBRange).Sort Key1:=Range("K3:K" & EmpBRange), Order1:=xlAscending, Header:=xlGuess, _
       OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
       DataOption1:=xlSortNormal

Merci d'avance

OriginalL'auteur Samantha Monti | 2013-03-08