Программно задать текст поля (Field) в VBA Word
От: Аноним  
Дата: 11.07.10 21:20
Оценка:
Подскажите, как правильно из VBA MSWord задать текст поля?

Поле создаю как
Set myRange = ActiveDocument.Range(ActiveDocument.Range.End - 1, ActiveDocument.Range.End)
Set openingBracesField = ActiveDocument.Fields.Add(myRange, wdFieldAddin, "OPENINGBRACESFIELD", False)


Таким образом, в конце документа появляется поле {OPENINGBRACESFIELD}

Нажав Alt+F9, оно исчезает.
Некоторые поля, вроде {DATE} содержат текст с форматированием (например 12.12.10), который и выводится при печати. При нажатии Alt+F9, текст {DATE} заменится на то, что будет напечатано (12.12.10)
Как можно программно задать этот текст в поле?

Делаю так (1):
openingBracesField.Result.Select
Selection.TypeText "MyFieldText"


Получаю текст MyFieldText после поля, то есть

{OPENINGBRACESFIELD}MyFieldText


причем этот текст не исчезает при нажатии Alt+F9

Подскажите, что я делаю не так? Как задать текст для поля?
Извините, если слишком дотошно описал проблему. Мне казалось, так понятнее. Спасибо
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.