Access - Funcion si existe?

Necesito una funcion que me diga si existe una tabla en mi base de datos, y otra funcion para que me diga si existe una base de datos en concreto en la unidad A

gracias

Para ver si existe un fichero
-----------------------------
' Lo unico que debes hacer es enviar el parametro cArchivo, ejemplo ExisteaArchivo("A:\DATOS.MDB")

Function ExisteArchivo(cArchivo As String) As Boolean
ExisteArchivo = IIf(Dir$(cArchivo) = "", False, True)
End Function

Para ver si existe una tabla
----------------------------
Function fExistTable(strTableName As String) As Integer
Dim db As Database
Dim i As Integer
Set db = DBEngine.Workspaces(0).Databases(0)
fExistTable = False
db.TableDefs.Refresh
For i = 0 To db.TableDefs.Count - 1
If strTableName = db.TableDefs(i).Name Then
'Estamos de suerte, la tabla existe
fExistTable = True
Exit For
End If
Next i
Set db = Nothing
End Function


Un saludo ... ;-)