Excel: 通过VBA代码打开word文件

文章背景：在使用Excel的Userform时，有时想要打开指定路径的word文件。下面介绍打开word文件的一种方式。

示例：

命令按钮打开文件中的代码如下：

Option Explicit

Private Sub CommandButton1_Click()

    Dim docApp, path As String
    
    path = TextBox1.Text
    
    Set docApp = CreateObject("Word.Application")
    
    docApp.Documents.Open path
    
    docApp.Visible = True
    
    docApp.Activate
    
    Set docApp = Nothing

End Sub

运行效果：http://mpvideo.qpic.cn/0bf2b4aqkaabziaa6cvhtvpvcd6dauhqcbia.f10002.mp4?dis_k=861911950b9509c42308311ba5eadc37&dis_t=1663654793&vid=wxv_1595932378013696000&format_id=10002&support_redirect=0&mmversion=false

参考资料：

[1] 调试经验——使用VBA在Excel中打开Word文档（https://blog.csdn.net/hpdlzu80100/article/details/80593099）

[2] Documents.Open method (Word)（https://docs.microsoft.com/en-us/office/vba/api/word.documents.open）

延伸阅读：

[1] Excel 通过VBA代码打开ppt文件