So kriegt man per VBA raus, ob eine Tabelle vorhanden ist:
Function tableExists(meineTab As String) As Boolean
On Error GoTo Fehlerbehandlung
Dim tdf As DAO.TableDef
Set tdf = CurrentDb.TableDefs(meineTab)
tableExists = True
Exit Function
Fehlerbehandlung:
tableExists = False
End Function