用WORD如何将我表格或文本框中的相应内容填入相应位置的WORD文本？

Question

我以前用的是EXCEL，它可以将相应的数据填入相应位置的表格中，但我想用WORD，有知怎么处理？最好有现成的例子。谢谢！

Answer 1

测试通过，这样就行了
在你的aa.doc文档中添加书签aaa，
下列代码的功能就是在书签aaa的位置插入字符串
可以定义多个书签。就可以插入不同文本了Private Sub Command1_Click()
    Dim WordTemps As New Word.Application
    WordTemps.Documents.Add "d:\aa.doc", False
    
    Dim str1 As String
    str1 = "我要添加的字符串内容"
    
    WordTemps.Selection.Goto wdGoToBook, , , "aaa"
    WordTemps.Selection.TypeText str1
    
    WordTemps.Visible = True
End Sub