#export-to-excel
#экспорт в Excel
Вопрос:
У меня есть база данных, которая импортирует файлы во временные таблицы перед экспортом данных в Excel и добавлением временных данных в основную таблицу. Каждый из файлов, загруженных во временные таблицы, содержал столбец с одинаковым уникальным значением для каждой записи. Я хотел бы создать запрос, который будет использоваться для фильтрации по первому, и добавить это значение из запроса в мое соглашение об именовании файлов для человека, который должен работать с выходными файлами.
Я создал запрос, который фильтрует первый, но я не могу найти способ включить этот результат в именование файла для вывода.
Функция Export_2nd_Level_Excel()
DoCmd.Переносит в acExport таблицу acexpreadsheet, acSpreadsheetTypeExcel12Xml, «2ndLevel», » pbfsvr01 pbf PharmNetwork Audits_Pharmacy Provider_Audits Завершенные файлы аудита 2nd_Level » amp; «[Вставить NPI]» amp; Формат (теперь, «_ddmmmyy»»_2ndLevel_to_PharmAudit») amp; «.xlsx», True
Завершение функции
Я хотел бы, чтобы «[Вставить NPI]» было фактическим значением из запроса, который извлекает первый из NPI.
Ответ №1:
поиграв с этим довольно долго, я смог заставить это работать
Функция Export_2nd_Level_Excel()
Установить db = CurrentDb Установить recd = db.OpenRecordset(«2nd_level_NPI»)
Затемнить NPI в виде строки
recd.Переместить первый NPI = recd![NPI]
DoCmd.Переноситпред-лист acExport, acSpreadsheetTypeExcel12Xml, «2ndLevel», » pbfsvr01 pbf PharmNetwork Audits_Pharmacy Provider_Audits Завершенные файлы аудита 2nd_Level » amp; NPI amp; Format(теперь, «_ddmmmyy»»_2ndLevel_to_PharmAudit») amp; «.xlsx», True
Завершение функции