Запрос в Access за период - VBA
Формулировка задачи:
Добрый день.
Подскажите как решить задачку. Необходима выгрузка данных в excel по датам.
По примеру ниже запрос выгружает записи по нужной ФИО, но по заданным датам в коде.
Не получается задать переменные для дат. Т.е. пользователь сам должен выбирать нужный ему диапазон.
Заранее спасибо за помощь.
Решение задачи: «Запрос в Access за период»
textual
Листинг программы
Dim sqlt$, d1 As Date, d2 As Date d1 = InputBox("Дата больше", , Date - 4) 'например d2 = InputBox("Дата меньше", , Date) sqlt = "select * FROM Таблица1 WHERE [fio] like '*" & t & "*' And [data]>#" _ & Format$(d1, "MM\/DD\/YYYY") & "# and [data]<#" & Format$(d1, "MM\/DD\/YYYY\#")