Access - Error por falta de archivo

Buenos días señores (as):

Tengo una pequeña consulta,

dentro de un formulario necesito hacer una búsqueda en una TABLA "TABLA_BUSQUEDA" que está vinculada a un ARCHIVO "PRUEBA".

Puede ser que el archivo PRUEBA no exista, en cuyo caso quiero evitar que me aparezca un error.

La línea de código que tengo es la siguiente:

Dim ARMG As Date
ARMG = DLookup("[VALORX]", "TABLA_BUSQUEDA", "[CODIGO] = 1")


Saludos desde Panamá

Lo primero que tienes que hacer es ver si existe el fichero
If Dir("C:\AQUI PONES DONDE DEBE ESTAR EL FICHERO") <> "" Then
ARMG = DLookup("[VALORX]", "TABLA_BUSQUEDA", "[CODIGO] = 1")
ELSE
LO QUE TE DE LA GANA
ENDIF
Saludos desde Cádiz (no yankee)

Gracias por tus comentarios.

Respuesta consisa y presisa.

Y funcionó del Carajo


Nuevamente Gracias.