FileExist i VBA

Hej

Jeg skal kontrollerer om en fil findes før den flyttes.

Men jeg kender kun et del af filnavet når den skal kontrollerer om filen findes,

F.eks. har jeg dette navn 123-456 og filen hvis den findes kan hedde 123-456 v2.doc

og hvis den ikke findes skal den blot fortsætte uden fejl

Har prøvet dette
fil = "123-456"

Set FSO = CreateObject("Scripting.FileSystemObject")

If (FSO.FileExists("H:\"& fil & "*")) Then

...........

end if

Hvordan kan det gøres

Tak 

/fajens