230问答网 > 求一个代码示例，在excel中用vba打开一个word文档，并将A1单元格的内容插入到word第一段段首的代码。

求一个代码示例，在excel中用vba打开一个word文档，并将A1单元格的内容插入到word第一段段首的代码。

2024-12-31 14:07:56

推荐回答（1个）

回答1：

在 Excel VBE 里进入菜单栏的工具、引用，勾选“Microsoft Word 15.0 Object Library”，其中我的版本号是 15.0，不同 Office 版本号不同，识别其它字段即可，然后运行下宏：

Sub ExcelOperatorWordDemo()
    Dim WdApp As Word.Application, WdDoc As Word.Document
    Set WdApp = CreateObject("Word.Application")
    WdApp.Visible = True
    Set WdDoc = WdApp.Documents.Add
    WdApp.Documents(1).Paragraphs(1).Range.Text = [A1]
End Sub