Вопрос : VBA, котор нужно ехпортировать соединило таблицы в в настоящее время доступе к Db к другому Db доступа

Блок Кодего под таблицами экспортов специфически в моей в настоящее время базе данных доступа к другой базе данных доступа.  

However, когда я ехпортирую «соединенные» таблицы от моей таблицы источника, он все еще показывает по мере того как соединенная таблица в базе данных доступа цели.  Так или иначе доработано этому Кодему, котор нужно обеспечить таблицы не покажутся соединения, а вместо появляются как импортированные таблицы?

Thanks для всех help. class= " ясное " >

> " codeSnippet " class=

class= " lineNumbers "

class=

1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24:

функция ExportTables " class= " id= " codeSnippet810844 Public () Тусклый db как база данных Тусклые rs как Recordset Тусклое sSQL как шнур sSQL = «отборное SourceTableName, TargetTableName, DatabaseName от tblTableExport» Установите db = CurrentDb () Установите rs = db.OpenRecordset (sSQL) Сделайте пока не rs.EOF Transfertype DoCmd.TransferDatabase: =acExport, _ databasetype: = " доступ Майкрософт ", _ databasename: =rs. Поля (2).Value, _ ObjectType: =acTable, источник: =rs. Поля (0). Значение, _ Назначение: =rs. Поля (1).Value, structureonly: =False rs.MoveNext Петля Функция конца

class=

Ответ : VBA, котор нужно ехпортировать соединило таблицы в в настоящее время доступе к Db к другому Db доступа

вам нужно ехпортировать таблицу от первоначально db для того чтобы сделать выставку по мере того как non соединенная таблица в назначении.