У меня проблема с моим кодом. У меня есть лист Excel, и я хочу открыть форму доступа с VBA. Но я получаю эту ошибку «Ошибка выполнения 429 - Невозможно создать компонент Active-X»
Sub opp()
Dim Access As Object
Set Access = CreateObject("Access.Application")
Access.Visible = True
Access.OpenCurrentDatabase "U:\Database1.accdb"
MsgBox "Datenbank geöffnet."
Access.CloseCurrentDatabase
Set Access = Nothing
End Sub