См. также Запустить Append-запрос на VBA
Пример 1-й:
Есть таблица Weeks:
где Week – номер отчетной недели, WeekName – название недели.
Пока таблица не содержит данных.
Есть другая таблица CustomerSalesData, например с данными о продажах клиентов по продуктам за каждую отчетную неделю за несколько лет:
Задача: заполнить уникальными данными таблицу Weeks: в поле Week пусть попадут все номера отчетных недель из таблицы CustomerSalesData; в поле WeekName попадут соответствующие названия недель, например "Week 1".
Решение с помощью запроса на добавление данных:
Открываем новый бланк запроса, тип запроса выбираем Append Query...:
Указываем таблицу, в которую будем добавлять данные:
Добавляем таблицу(ы) в запрос, данные которой будем добавлять – таблица CustomerSalesData.
Запрашиваем из таблицы CustomerSalesData поле – Week, данные которого будем добавлять в таблицу Weeks в поле – Week:
(так как данные по полю Week в таблице не уникальны, мы эти данные группируем. См.: запрос с группировкой)
По строке "Append To:" выбираем еще поле для добавления в него данных – WeekName:
Указываем для поля WeekName выражение "Week " & [dbo_CustomerSalesData]![Week], (чтобы получилось "Week 1"):
Перед запуском можно посмотреть предварительный результат будущих данных для таблицы Weeks
(c помощью режима View 
)
Вернуться в конструктор запроса 
Запустить запрос 
.