Как открыть форму Access из Excel

MyTetra Share

Делитесь знаниями!

Ссылка на оригинал

Время создания: 12.10.2019 20:34

Раздел: Разные закладки - VBA - Access - Excel->Access

Запись: xintrea/mytetra_db_adgaver_new/master/base/1570884996wvtx7y6fps/text.html на raw.githubusercontent.com

Как открыть форму Access из Excel

Автор Дмитрий Якушев На чтение2 мин. Просмотров62

Что делает макрос: В некоторых случаях, вам или вашим клиентам, возможно, потребуется переключить фокус на форму доступа. Этот пример демонстрирует, как вы можете открыть форму Access из Excel.

Содержание

Как макрос работает
Код макроса
Как этот код работает
Как использовать

Как макрос работает

С помощью этого макроса, вы указываете Excel базу данных Access и вызываете определенную форму доступа, чтобы открыть.
Для автоматизации доступа, необходимо установить ссылку на библиотеку объектов Microsoft Access. Для этого откройте VBA в Excel и выберите Tools➜References. Откроется диалоговое окно «References». Прокрутите вниз, пока вы найдите запись Microsoft Access XX Object Library, где XX — это ваша версия Access. Выберите флажок рядом с записью.

Код макроса

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.

Так же в этом разделе:

MyTetra Share v.0.65