Здравствуйте, светлые головы!
Нужно из "A.mdb" в "B.accdb" импортировать таблицы, запросы, модули... ВСЁ
Нашёл на форуме что-то похожее, но не работает, правда и не ругается.

Dim appAccess As New Access.Application
Dim obj As AccessObject
appAccess.OpenCurrentDatabase "D:\Мои документы\A.mdb"
' все модули
For Each obj In appAccess.CurrentProject.AllModules
Debug.Print obj.Name
Next obj
' тоже самое для AllForms, AllReports, AllMacros

' таблицы и запросы видны через TableDefs и QueryDefs :
Dim db As DAO.Database
Dim tdf As DAO.TableDef
' все таблицы
Set db = appAccess.CurrentDb
For Each tdf In db.TableDefs
Debug.Print tdf.Name
Next tdf
' тоже самое для QueryDefs

http://www.sql.ru/forum/1137970/transferdatabase-vsyo