Question

我想使用Microsoft Word 2010引用文本字段。我正在编写条款和条件表单，所以我的第一页是这样的：

company name: [textfield]
contact person: xxx
phone: xxx

所以我想使用我在下一页更新的第一页上输入的详细信息，例如，第二页包含：

I [company_name] accept terms and conditions etc...

[contact_person]
[phone]

例如，这是文本

所以我想输入公司名称1次，所以它应该出现在下一个文本表格中。

所以最后的结果应该是这样的：

Company: test

I test accept terms and conditions above.

提前致谢

Answer 1

尝试以下方法：

将书签添加到您保存的Word模板中;
应用以下代码：

    Dim sSave_Path                              As String  
    Dim sSave_File                              As String  
    Dim sFile_Template                          As String  

    Dim oWord_App                               As Word.Application  
    Dim oWord_Doc                               As Word.Document

    sFile_Template = "" 'Define template File  
    sSave_Path = "" 'Define Save Path  
    sSave_File = "" 'Define Save Filename  

    Set oWord_App = New Word.Application  
    Set oWord_Doc = oWord_App.Documents.Add(sFile_Template)  
    oWord_App.Visible = True
    oWord_App.Activate

    oWord_Doc.Bookmarks("TEST").Range.Text = "TEST"
    oWord_Doc.SaveAs sSave_Path & "\" & sSave_File & ".doc"
    oWord_Doc.Close
    oWord_App.Quit

Answer 2

Microsoft Word文本字段引用

2 个答案: