使用表格更新 Word 中的字段

Question

我想在我的 MS Word 报告中实现以下功能。不确定如何/是否可行。

这是我心中的图像，供参考：

1. 在报告的开头，包含一个包含所有参数的输入表。
2. 在整个报告内容中，设置字段将随着表中输入的变化而变化。
3. 例如：PARAMETER 1 设置为 100，则内容部分中的所有 PARAMETER 1 将自动更改为 100。

谢谢

Answer 1

我认为您需要使用 VBA 来实现这个要求。

打开 VBA 控制台：单击“Alt + F11”

下面是屏幕录制生成的宏，你可以参考一下：

Sub Macro5()
Selection.TypeText Text:="100"
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
        .Text = "parameter1"
        .Replacement.Text = "100"
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchByte = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.TypeText Text:="200"
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "parameter2"
        .Replacement.Text = "200"
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchByte = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
    Selection.TypeText Text:="300"
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
        .Text = "parameter3"
        .Replacement.Text = "300"
        .Forward = True
        .Wrap = wdFindAsk
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchByte = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
End Sub

只需要修改下面两个参数就可以控制该变量的值：

类型文本文本：=“XX”替换文本 =“XX”

Answer 2

我认为我找到了一种非常接近您想要的方法，但是您必须使用文档的高级属性而不是文档中的表格。

这些是从头开始的步骤（针对 Windows 上最新版本的 Word）：

1. 创建新文档
2. 转到文件➡属性（右上角）➡高级属性：

3. 然后转到出现的窗口中的“自定义”选项卡
4. 在这里您可以创建自定义文档属性，您可以使用它来存储参数值，如下面的 GIF 所示（抱歉打错了）：

5. 现在回到文档。在那里你可以使用字段代码显示文档属性。

6. 最简单的方法是转到您希望参数文本出现的位置，按CTRL+ F9，键入DOCPROPERTY parameter_name \* MERGEFORMAT，然后按F9更新文档中的所有字段代码（包括您刚刚创建的字段代码）：

7. 在您希望参数出现的每个位置重复此操作

要更改文档中的参数值，请在高级属性中更新它（步骤 2-3），返回文档并按 更新所有字段代码F9。

这是一个简短的演示：