Microsoft Access Добавить VBA

Question

Я пытаюсь автоматизировать записи из запроса для добавления в таблицу, если идентификатор не существует.Хотя я столкнулся с проблемами, я даже пытался использовать VBA из некоторых других баз данных, которые, как я знаю, работает, и поместить их в целевую базу данных.Тем не менее, я получаю ту же ошибку.При появлении ошибки подсвечивается «dbs as Database».

Ошибка - «Ошибка компиляции: пользовательский тип не определен»

Function HistoricTable()

Dim dbs As Database
Dim qdf As QueryDef


Set dbs = CurrentDb

dbs.Execute "insert into [Destination_Table]  SELECT * FROM [Query Name]  "



End Function

Спасибо!

Answer 1

Я считаю, что это должно быть примерно так.

INSERT INTO target [(field1[, field2[, …]])]
VALUES (value1[, value2[, …]])

Для получения дополнительной информации см. Ссылку ниже.

http://www.fmsinc.com/microsoftaccess/query/snytax/append-query.html

Answer 2

Вы должны добавить ссылку на библиотеку DAO в редакторе VBA.В моем старом доступе он находится в меню Tools > References...

Вы также можете удалить библиотеку ADODB (другую технологию доступа к базе данных).