Hi,
something like this:

dim tdf as tabledef
on error resume next
set tdf=currentdb.tabledefs(strTableName)
if err.number=0 then
   'table exist
else
   'not
end if