MS Access не умеет открывать и присваивать объекты Excel - PullRequest
0 голосов
/ 12 июня 2019

Файл Excel не открывается в MS Access.

Этот кусок кода работал несколько дней назад. Теперь он НЕ выдает ошибку и не создает никаких объектов Excel.

Dim XL As Object
Set XL = New Excel.Application
XL.workbooks.Open(ourPath)

Назначение объекта должно работать (путь правильный, я проверял его несколько раз).

1 Ответ

0 голосов
/ 12 июня 2019

Поскольку вы используете раннее связывание, возможно, вам не хватает ссылки на библиотеку объектов Microsoft Excel (Tools > References), или, возможно, эта библиотека была отображена как MISSING в результате открытия ваша база данных в более ранней версии MS Access.

Тем не менее, чтобы полностью избежать ссылок и исключить это как возможную причину, вы можете попробовать использовать позднее связывание, например ::100100

Dim XL As Object
Set XL = CreateObject("Excel.Application")
XL.Workbooks.Open(ourPath)
...