Как запланировать автоматический экспорт запроса MS Access в Excel и отправить его по электронной почте?
Я знаю, что Access может настроить задачу Outlook для автоматического экспорта запроса в Excel, но для этого необходимо, чтобы Outlook всегда был открыт на компьютере пользователя.
Есть ли простой способ настроить расписание, которое может автоматически экспортировать запрос в Excel, и это расписание будет автоматически отправлять экспортированный файл Excel по электронной почте, например, каждый понедельник в 5 утра?
Если это можно сделать только в VBA, могу ли я начать с какой-либо ссылки?
Благодарю.
2 ответа
Я не знаю, как это запланировать, но это может дать вам хорошее начало:
If Weekday(Now(), 2) = 1 Then
If Forms![Head Form]![Once subform].Form![ID] = 0 Then
DoCmd.OpenQuery "UpdateOnce1", acViewNormal, acEdit
DoCmd.SetWarnings False
DoCmd.OpenReport "Report1", acViewPreview
DoCmd.RunSavedImportExport "Export-Report 1"
Dim strSql
Dim db As Database
Set db = CurrentDb()
Dim Outlook
Dim rng
Dim OutApp As Object
Dim OutMail As Object
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
On Error Resume Next
With OutMail
.To = "number of mail adresses"
.CC = ""
.BCC = ""
.Subject = "Report 1"
.HTMLBody = ""
.Attachments.Add ("T:\.....\Report1.pdf")
.Send
End With
DoCmd.Close acReport, "Report1"
End If
End If
Таким образом, если это понедельник, а код еще не запущен (он проверяет, равен ли идентификатор 0), отчет 1 является открытым, экспортируется в PDF, добавляется как вложение, а затем отправляется по почте через outlook.
Я не думаю, что вы можете сделать это с помощью Access. Вы можете использовать такой инструмент:
http://www.hybing.com/Report-Genie.html
Они могут получать данные из базы данных, экспортировать их в Excel и отправлять по электронной почте. Доклад джинн стоит дешево, хотя это довольно старое программное обеспечение, и я не знаю, есть ли у него какая-либо поддержка. Я не думаю, что есть способ планировать задачи тоже. R-Tag имеет платную и бесплатную версию. Обе версии позволят вам запланировать задачу экспорта данных из любой базы данных в Excel и отправить файл по электронной почте. Есть некоторые ограничения для бесплатной версии.