À partir de VB, utilisant le DAO voici comment moi j'y arrive (DBOuverte représente une variable de type Database qui as déjà été initialisée avec une base de données, autrement dit, le fichier est ouvert):
Public Function RechercherTable(DBOuverte As Database, TableRc As String) As Boolean
Dim RSTemp1 As Recordset
On Error GoTo ErrHndBR
If (LenB(TableRc) >0) Then
Set RSTemp1 = DBOuverte.OpenRecordset(TableRc, dbOpenTable)
RSTemp1.Close
RechercherTable = True
'Else
End If
Exit Sub
ErrHndBR:
RechercherTable = False
End Sub