VB и Word - помогите ПЛЗ! Простой вопрос - очень нужно

[ShVSerg]

Добрый день всем знатокам.
Бьюсь над поисками ответа на такой простой вопрос который день. В word-овском VB нужно из созданной формы для ввода текста в поля из TextBox-а формы после ее закрытия переместить текст в текущий документ Word, в котором эта форма была создана.

P. S. Прошу прощения за столь простой вопрос но...

[RayShade]

activedocument.content.insertafter(textbox1.text)

[ShVSerg]

Спасибо RayShade. Только подкорректирую - нужно вставить текст из textbox-a формы в определенное место документа Word - просто осуществляется ввод данных из формы VB в бланк документа (например, доверенность...)

Заранее спасибо огромное (и за скорость в частности)

[RayShade]

Ну тогда, уточняющий вопрос - а это место как то отмечено в самом документе? В смысле, что как узнать-то, какое это "определенное" место?

[ShVSerg]

Вот же ж частично в том и вопрос - как отметить нужное для ввода текста из формы место в .doc - документе, чтобы поместить туда текст из формы.

Заранее сенкс.

[RayShade]

Я обычно вставляю какие нибудь маркеры.

Типа %mytextinsertshere%

И потом заменяю их через Replace.

[ShVSerg]

Я обычно вставляю какие нибудь маркеры.
Типа %mytextinsertshere%
И потом заменяю их через Replace.

Прости за неосведомленность, пример с Replace можно? Спасибо.

[Konst_One]

F1 нажми в ворде в редакторе VBA и поищи там по слову : REPLACE
Заодно и сам научишься программить в ворде

[RayShade]

Как то так:

Код: Выделить всё

With Selection.Find
    .Forward = True
    .ClearFormatting
    .MatchWholeWord = True
    .MatchCase = False
    .Wrap = wdFindContinue
    .Replacement = textbox1.Text
    .Execute "%mytextinsertshere%"
End With

UPD.



Konst One

Следуя твоему совету, он найдет функцию replace. А она делает, несколько не то.