Добрый день!
Пишу на 2003 офисе маленький код.
смысл - в экселе выбор типа документа и юрлица.
по нажатию кнопки - все это переносится в нновый документ Word на основе шаблона.В шаблон вставлен текст а-ля !1 , !2
при нахождении текста !1 он заменяется на нужное мне значение.
Set myRange = objDocument.Content.Find
With myRange
.Forward = True
.ClearFormatting
.Execute FindText:="!1", ReplaceWith:=string, Replace:=wdReplaceAll
end with
Внимание вопрос -
как мне найти в шаблоне слово и перевести к нему курсор или выделить полностью ...??


No Money - No Honey!!!

да, утровечера мудренее
решилось все без заморочек
With objword.Selection.Find
.ClearFormatting
.Execute FindText:="!1", ReplaceWith:="123", Replace:=wdReplaceAll
.Text = "!Картинка"
.Execute Forward:=True
End With


No Money - No Honey!!!