Access - CONTROL FICHERO EXTERNO

Function Importar()

On Error GoTo Importar_Err

Dim DirArch As String
'--- Dirección del archivo a importar ----------------------------------------------------------------
DirArch = Dir + "assets.txt"

¿COMO CONTROLO LA EXISTENCIA DEL FICHERO .TXT ANTES DE EJECUTAR LA TRANSFERENCIA DE LA SIGUIENTE LINEA? NO QUIERO QUE ME DE ERROR AL EJECUTAR, SI NO DETECTARLO ANTES.
¿EXISTE UN "IF FICHERO EXISTS" O ALGO PARECIDO?
UN SALUDO Y GRACIAS

DoCmd.TransferText acImportDelim, "ASSETS", "ASSETS", DirArch, False, ""

Importar_Exit:
Exit Function

Importar_Err:
MsgBox Error$
Resume Importar_Exit

End Function

If Not file("nombre del fchero") Then
.....
...
.
endif

Gracias por la respuesta, ahora me da el siguiente error:
Error de compilación
No se ha definido Sub o Function
y se posiciona el cursor en la palabra file:
If Not file("c:/gastos/assets.txt") Then
Estoy trabajando con Access 97.

Yo utilizo

if dir("c:/gastos/assets.txt") <> """ then
DoCmd.TransferText acImportDelim, "ASSETS", "ASSETS", DirArch, False, ""
else
docmd.cancelevent
end if

Saludos