Мне нужно скопировать большое количество связанных таблиц в другую базу данных, но я хочу, чтобы они оставались ссылками, а не копиями данных.
Я могу перетаскивать ссылки на таблицы между моими двумя открытыми базами данных, но это копирует данные.
Я также рассмотрел написание пары функций VBA, которые выглядят примерно так:
Set db = CurrentDb
db.TableDefs.Refresh
For Each myTable In db.TableDefs
If Len(myTable.Connect) > 0 Then
'' export myTable.Name and myTable.Connect to a flat file (or table)
End If
Next
и
Set db = CurrentDb
db.TableDefs.Refresh
For Each ''row in flat file
Set tdf = db.CreateTableDef([myTable.Name])
tdf.Connect = [myTable.Connect]
db.TableDefs.append tdf
Next
Прежде чем я это сделаю, есть ли более простой способ, который я пропустил?