Определения поля формы выбран

Question

Я использовал следующий код, чтобы найти текст и сделать замену

Do 
    Selection.HomeKey Unit:=wdStory 
    Selection.Find.ClearFormatting 
    With Selection.Find 
     .MatchWholeWord = True 
     .MatchCase = False 
     .Text = "QLD" 
     .Forward = True 
     .Wrap = wdFindContinue 
    End With 
    If Selection.Find.Execute = False Then 
     Exit Do 
    Else 
     Selection.Delete 
     Selection.TypeText Text:="Queensland " 
    End If 
Loop 

клиента, использующий этим начали использовать поле форм в настоящее время и хотят текст формат применить поле формы.

Как определить, что выбор содержит поле формы, чтобы получить его свойства?

Answer 1

Чтобы проверить, есть ли FormField в выборе проверить это:

if Selection.FormFields.Count > 0 then 

Если у вас есть один FormField в выборе вы можете изменить любой из его имущества, как это (пример того, как жирный текст):

Selection.FormFields(1).Range.Font.Bold = True 

И читать текущее значение FormField использования этого:

Selection.FormFields(1).Result