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

选择确定表单字段

1 个答案: