Открыть документ Word с кнопкой Excel 2016 на Mac

Question

Я пытаюсь использовать этот код с кнопкой, чтобы открыть слово doc в excel 2106 на компьютере Mac, работающем с высокой скоростью:

Sub buttontest1()
Dim objdoc As Object

FileName = "/Volumes/256SSD/word docs/shortcut keys.docx"

With CreateObject("word.application")

Set objdoc = .documents.open(FileName)
End With

Set objdoc = Nothing
End Sub

При первом запуске это работает нормально.Затем я закрываю слово doc (команда q) и запускаю его снова, но получаю ошибку времени выполнения -2146959355 (80080005), и открывается пустое слово doc.Я нажимаю «Конец» в окне ошибки времени выполнения и выхожу из слова doc, снова запускаю код, и слово doc открывается правильно.Я выхожу из документа и снова запускаюсь и получаю ошибку времени выполнения.

Может кто-нибудь помочь, пожалуйста?

PS Я пробовал использовать: вместо / в пути к файлу, но это дает другую ошибку

Answer 1

Я могу воспроизвести поведение.Похоже, что это известная проблема с Mac VBA - более года, как подтверждает Microsoft:

https://answers.microsoft.com/en-us/msoffice/forum/msoffice_officeinsider-mso_mac-msoinsider_excel/trying-to-open-word-from-excel-vba-results-in-run/856d9a54-cc92-4ad8-9f49-cae38e7335b7