Открытие отчета о доступе из Excel происходит в окне «Сохранить как»

Question

Я хочу открыть отчет Access из Excel, но вместо того, чтобы показывать отчет, он идет в окно «сохранить как».

Я пробовал acViewDesign, acViewNormal, acViewPreview и без него, но все это дает мне тоже самое.

Dim accessApp As Object


Sub DisplayReport()

Dim DocName As String
Dim Path As String

Set accessApp = CreateObject("Access.Application")

Path = "C:\Users\user\Desktop\Database1.accdb"

accessApp.OpenCurrentDatabase Path

accessApp.DoCmd.OpenReport "Sheet1", acViewReport
accessApp.Visible = True

End Sub

Answer 1

Либо добавьте ссылку на библиотеку объектов доступа, либо используйте значение 5 вместо acViewReport

accessApp.DoCmd.OpenReport "Sheet1", 5

Все постоянные значения здесь