Обнаружил интересный эффект. Нужно было получить TableDef определенной таблицы, а присвоение

Set tdf = CurrentDb.TableDefs(strTable)

не работало - на tdf рагалось дальше "Object invalid or no longer set"

Вот так работает:

Set tdf = DBEngine(0)(0).TableDefs(strTable)

И так работает:

Set db = CurrentDb()
Set tdf = db.TableDefs(strTable)

Не совсем понятно, почему такое происходит. Понятно, что CurrntDb дает ссылку на текущую копию базы данных, каждое обращение это будет новая копия, но ссылка на объект с определением таблицы должен быть тот же самый. Или все ссылки на объекты базы данных, полученные через CurrentDb разрушаются сразу же после обращения к CurrentDb?

http://www.sql.ru/forum/1229049/prisvoenie-s-ispolzovaniem-currentdb-i-dbengine-0-0