使用表格更新 Word 中的字段

使用表格更新 Word 中的字段

我想在我的 MS Word 報告中實現以下功能。不確定這如何/是否可能。

這是我心中的形象,供參考:

我想要的例子

  1. 在報告的開頭,包含一個包含所有參數的輸入表。
  2. 在整個報告的內容中,設定​​當表中的輸入發生變化時也會發生變化的欄位。
  3. 範例:PARAMETER 1 設定為 100,則 Content 部分中的所有 PARAMETER 1 將自動變更為 100。

謝謝

答案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

只需要修改以下兩個參數即可控制變數的值:

TypeText 文字:="XX" Replacement.Text = "XX"

答案2

我想我找到了一種非常接近您想要的方法,但是您必須使用文件的高級屬性,而不是文件中的表格。

以下是從頭開始的步驟(適用於 Windows 上最新版本的 Word):

  1. 建立一個新文檔
  2. 轉到檔案➡屬性(右上角)➡進階屬性:

在此輸入影像描述

  1. 然後轉到出現的視窗中的“自訂”選項卡
  2. 在這裡您可以建立自訂文件屬性,您可以使用它來儲存參數值,如下 GIF 顯示(抱歉,拼字錯誤):

在此輸入影像描述

  1. 現在回到文檔。在那裡你可以使用字段代碼顯示文檔屬性。

  2. 最簡單的方法是前往您希望參數文字出現的位置,按CTRL+ F9,鍵入DOCPROPERTY parameter_name \* MERGEFORMAT,然後按F9更新文件中的所有欄位程式碼(包括您剛剛建立的欄位程式碼):

在此輸入影像描述

  1. 在您希望參數出現的每個位置重複此操作

若要變更整個文件中的參數值,請在「進階屬性」中更新它(步驟 2-3),返回文件並按 更新所有欄位程式碼F9

這是一個簡短的演示:

在此輸入影像描述

相關內容