bah en fait, c'est bon, j'ai trouvé... C'est vraiement lourd comme truc.
En fait, voici le code :
Set ExcelRange = donnees_gpo.Range("A2:Z" & nb_lignes + 1)
Set ExcelRangeKey = donnees_gpo.Range("A2" )
Set ExcelRangeKey2 = donnees_gpo.Range("B2" )
ExcelRange.Sort Key1:=ExcelRangeKey, Order1:=xlAscending, Key2:=ExcelRangeKey2 _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
--> Pour les keys, on est obligé de créer un objet de type Range et de faire a la fin
Set objetRangeKey = noting
MERCI VBA DE ..[CENSURE]..