Я застрял в глупой ошибке в моем коде VBA.
ситуация: создать документ Word из Excel с шаблоном Word
проблема: документ Word открывается не каждый раз
Если Word все еще открыт (но в фоновом режиме), код работает нормально.
Если Word закрыт, код открывает Word, но не Document.Word открыт и активен в разделе «новый документ».Var wrdDoc (в моем коде) пуст.После этой первой попытки я закрываю Word и снова запускаю код, он работает совершенно нормально.Эти два шага я могу повторить навсегда.Только во втором запуске с закрытым Word он работает нормально.
До и после кода у меня есть другие мысли, но это не могло повлиять на документ Word.
Система: MacBook Pro,macOS Mojave (10.14.2), Microsoft для Mac версии 16.20
Обычно аргументы «NewTemplate: = True, Visible: = True» не нужны, но без них документ не появляется ни при каких попытках.
Dim wrdDoc, wrdApp
On Error Resume Next
Set wrdApp = GetObject(, "word.application") 'gives error 429 if Word is not open
If Err = 429 Then
Set wrdApp = CreateObject("word.application") 'creates a Word application
Err.Clear
End If
wrdApp.Visible = True
Set wrdDoc = wrdApp.documents.Add(template:="/<path>/template.dotx", _
NewTemplate:=True, Visible:=True)