- У меня есть лист Excel со всей информацией для составления электронного письма.
- Я запускаю Macro, чтобы открыть шаблон Word, являющийся файлом .Docx, и заполнить закладки данными из листа Excel.
- , когда макрос пытается открыть Word Doc, он говорит, что ole используется, и слово предлагает три варианта: только чтение, слияние с локальным и т. Д., И сообщение о том, что файл заблокирован моим именем.
- Я использую close and quit для закрытия шаблона в каждом цикле, но не могу это исправить.Я что-то упустил, чтобы правильно закрыть документ, чтобы он правильно открывался без использования файла.
For iRow = 9 to rng
if ws.cells(iRow,6).value <> Nullstring and ws.cells(iRow, 7).value = "" then
Set objword = createobject("word.application")
bsent = false
objword.visible = true
set objdoc = objword.documents.open(Templatename()) '****here i'm getting error *****
objDoc.bookmarks("applicationname").range.text = ws.cells(iRow,2).value
set olmailitem = olfolder.items.add("IPM.Note")
set olMailitem = objDoc.mailenvelope.item
with olmailitem
.To = ws.cells(iRow,29).value
.CC = ws.cells(iRow,52).value
.Subject = "some text here"
.attachments.add (filepath)
if bsent = false then .send
.display
end with
<* if open correctly without locking, then it fill in my bookmarks first time>
objdoc.close
objword.quit
set objdoc = nothing
Set objword = nothing
end if
Next iRow