passa la path del file a questa funzione
e la funzione FileExist sarà True se il file esiste, False se non esiste

codice:
Function FileExist(FileName As String) As Boolean
    On Error GoTo NotExist
    'Se non viene aperto (errore) in file non esiste
    Close #1
    Open FileName For Input As #1
    Close #1
    FileExist = True
    'Se viene aperto il file esiste
    Exit Function
NotExist:
    FileExist = False
End Function