У меня есть форма доступа, которая позволяет пользователю получать прогнозные данные и исторические данные из нескольких источников. Хронологические данные суммируются с использованием перекрестного запроса qryHistoricalOverview для управления переменным числом дат, которые можно выбрать. Затем я использую запрос выбора, qryODLaneSummary, чтобы объединить исторические и прогнозируемые данные вместе. Как использовать этот запрос в качестве источника записей для отображения всех исторических полей в представлении таблицы данных?
Мой текущий код, который я пытался изменить из другого решения, ничего не возвращает.
Dim i As Integer
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb()
Set rs = db.OpenRecordset("qryODLaneSummary", dbOpenDynaset)
i = 0
While i < rs.Fields.count - 1
Debug.Print rs.Fields(i).Name
i = i + 1
Loop
Еще один вариант, который я видел, включает добавление элементов управления, но я беспокоюсь о времени обработки для удаления, а затем добавлении всех элементов управления.
Ниже приведены некоторые примеры данных. Датированные столбцы представляют собой переменную сумму. Я позволил пользователю выбрать даты, которые они хотят видеть. Я мог бы ограничить количество дат, но хотел бы предложить гибкость, если это возможно.
Orig Dest Plan Plan Pos 12/10/2019 12/11/2019 12/12/2019 12/13/2019
8711L 7649N 0.38 0.38 0.2 0.2 0.1 0.3
8719T 7649N 0.38 0.38 0.25 0.25 0.3 0.3