Как открыть форму Access из Excel
Автор Дмитрий Якушев На чтение2 мин. Просмотров62
Что делает макрос: В некоторых случаях, вам или вашим клиентам, возможно, потребуется переключить фокус на форму доступа. Этот пример демонстрирует, как вы можете открыть форму Access из Excel.
Содержание
- Как макрос работает
- Код макроса
- Как этот код работает
- Как использовать
Как макрос работает
С помощью этого макроса, вы указываете Excel базу данных Access и вызываете определенную форму доступа, чтобы открыть.
Для автоматизации доступа, необходимо установить ссылку на библиотеку объектов 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
15 |
Sub OtkritFormuAccess()
'Шаг 1: Объявляем переменные
Dim AC As Access.Application
'Шаг 2: Запустите Access и откройте целевую базу данных
Set AC = New Access.Application
AC.OpenCurrentDatabase _
("C:\Temp\YourAccessDatabase.accdb")
'Шаг 3: Откройте целевую форму и сделайте доступ видимым
With AC
.DoCmd.OpenForm "MainForm", acNormal
.Visible = True
End With
End Sub |
Как этот код работает
- объявляем переменную объекта AC. Эта переменная открывает библиотеку приложений баз данных Access.
- используем переменную AC, чтобы открыть базу данных Microsoft Access, где находятся целевые формы.
- открываем соответствующую форму. Форма Access открывается в новом окне Microsoft Access. Обратите внимание, что вы не закрывали базу данных в последней строке шага 3.