Я видел пример кода из "Gord" ниже - я хотел бы сохранить шаблоны Excel в моем интерфейсе доступа и обновлять их по мере необходимости пользователем, выполняя запрос select и заполняя шаблон Excel, а затем сохраняя шаблон в каталог пользователей по выбору. В приведенном ниже коде я не могу понять, «FileData» и «FileName».
Вот пример типичного вывода из моего запроса:
CY Month Avg Count
2019 1 12.00 43
2019 2 11.00 42
2019 3 10.00 67
2019 4 13.00 43
2019 5 11.00 33
2019 6 9.80 23
Эти данные поступают в шаблон Excel, который затем выполняет некоторые задачи и составляет графики. Месяцы могут варьироваться от 1 месяца до 12 месяцев.
Я работал над этим некоторое время - пример Горда - самый близкий, который я нашел. Я могу настроить внешний шаблон в локальной сети и тому подобное, но это кажется медленным.
Option Compare Database
Option Explicit
Public Sub SaveReportTemplateToFile()
Dim cdb As DAO.Database, rowRst As DAO.Recordset, attachRst As DAO.Recordset2, attachField As DAO.Field2
Set cdb = CurrentDb
Set rowRst = cdb.OpenRecordset("SELECT TemplateFile FROM ReportTemplates WHERE ID=1")
Set attachRst = rowRst.Fields("TemplateFile").Value
Set attachField = attachRst.Fields("FileData")
attachField.SaveToFile "C:\Users\Gord\Desktop\" & attachRst.Fields("FileName").Value
Set attachField = Nothing
attachRst.Close
Set attachRst = Nothing
rowRst.Close
Set rowRst = Nothing
Set cdb = Nothing
End Sub
Я застрял с тем, как заполнить данные в шаблоне Excel, который является вложением в базе данных, и FileName. Кроме того, в этом примере данные хранятся только в экспортированном файле?