Søgning på dato i Makro

Jeg har et regneark hvor der i kolonne A står både tekst samt dato'er. Datoerne er formateret dd-mm-yyyy. Når jeg i Excel søger på 01-01-2005 kan den sagtens finde cellerne, men når jeg optager søgningen i en makro og prøver at køre makroen fejler den med : Run Time Error 91. Hvad gør jeg galt ?

  Application.FindFormat.NumberFormat = "m/d/yyyy"
    Cells.Find(What:="01-01-2006", After:=ActiveCell, LookIn:=xlFormulas, _
    LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlNext, _
    MatchCase:=False, SearchFormat:=True).Activate