Excel - Buscar archivo .xla

Hola a todos

¿Como puedo hacer para, desde una macro de excel, comprobar si en el ordenador donde se está ejecutando dicha macro, existe un determinado archivo ("FTP.xla") o no?

No tengo ni idea de por donde empezar.

Un saludo y Gracias

Hola, aqui te mando este código que espero que te sirva...

Sub Buscar()
Dim Ruta, Archivo
Dim fila, longitud, aux, cant, Nombre
Ruta = ThisWorkbook.Path 'Aquí toma la ruta donde está ubicado el archivo de excel
longitud = Len(Ruta)
Archivo = Dir(Ruta)
Set fs = Application.FileSearch
With fs
.LookIn = Ruta
.Filename = "FTP.xla"
.SearchSubFolders = True
If .Execute(SortBy:=msoSortByFileName, _
SortOrder:=msoSortOrderAscending) > 0 Then
MsgBox "Se encontró el archivo buscado."
Else
MsgBox "No se encontró ningún archivo."
End If
End With
End Sub

hola
Gracias por la respuesta, al final he usado el siguiente codigo:

He guardado el archivo como un addins, y en la propiedades del mismo le he llamado FTP_ADDINS, asi con la siguiente linea de codigo es suficiente.

IF AddIns("FTP_ADDINS").Path <> vbNullString THEN
MsgBox "Se encontró el archivo buscado."
ELSE
MsgBox "No se encontró ningún archivo."
END IF

Un Saludo