Soru Tarihe göre sırala makrosu

[NADİR YILDIZ]

başka çalışmamda tarihe göre sırala makrosu diğer çalışmamda hata mesajı veriyor
sorun nereden kaynaklı acaba ?


Range("N4:U5000").Sort Key1:=Range("P4"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNumbers

 

[NADİR YILDIZ]

arkadaşlar örnek dosyam ektedir.
tarihe göre sırala makrosu burada hata mesajı veriyor
nereden kaynaklı olabilir