Как открыть отчет Access из Excel
Автор Дмитрий Якушев На чтение2 мин. Просмотров53
Что делает макрос: Отчеты Access позволяют создавать профессионально отчеты, которые имеют формат PDF. Если вы работаете и распространяете большое количество отчетов Access, следующий макрос может помочь автоматизировать процессы (открыть отчет Access из Excel).
Содержание
- Как макрос работает
- Код макроса
- Как этот код работает
- Как использовать
Как макрос работает
Этот макрос демонстрирует, как вы можете открыть отчеты Access прямо из Excel.
Обратите внимание, что вам нужно будет установить ссылку на библиотеку объектов Microsoft Access.
Для этого откройте VBA в Excel и выберите Tools➜References. Откроется диалоговое окно «References». Прокрутите вниз, пока вы
найдите запись Microsoft Access XX Object Library, где XX — это ваша версия Access. Выберите флажок рядом с записью.
Код макроса
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14 |
Sub OtkritOtchetAccess ()
'Шаг 1: Объявляем переменные
Dim AC As Access.Application
'Шаг 2: Запустите Access и откройте целевую базу данных
Set AC = New Access.Application
AC.OpenCurrentDatabase _
("C:\Temp\YourAccessDatabase.accdb")
'Шаг 3: Откройте целевой отчет как текстовый файл Word
With AC
.DoCmd.OpenReport "Отчет о доходах", acViewPreview
.DoCmd.RunCommand acCmdOutputToRTF
.Quit
End With
End Sub |
Как этот код работает
- Шаг 1 объявляет переменную объекта. Эта переменная открывает библиотеку приложений баз данных Access.
- На шаге 2, переменная AC запускает Microsoft Access и открывает базу данных, где находится целевой отчет.
- Шаг 3 просто запускает соответствующий отчет, посылая вывод в текстовый файл Microsoft Word. После того как файл выводится, база данных закрывается.
