使用Word宏从Excel导入数据

Question

我想将Excel文件中的数据导入Word。

技巧将是Word VBA宏的一部分，所以我必须从Word而不是Excel执行。

我需要Word中的宏来打开excel，复制excel单元格的数据，关闭excel并将数据粘贴到单词格式的单元格中。

有什么建议吗？谢谢！

Answer 1

这样的事情：

Sub OpenExcelFile()

    Dim Excel As Excel.Application
    Dim WB As Workbook

    Set Excel = New Excel.Application
    Set WB = Excel.Workbooks.Open("C:\filepath.xls")
    Excel.Visible = True
    Set WB = Excel.Workbooks.Open(sPath)

End Sub