VBA的一個強項是可以跨應用操作，特別是在office各程式內部。以下程式碼實現了在Excel中開啟Word文件。

程式碼：

Sub openWord()
'在Excel中開啟Word文件
'
'
    Dim sFName As String, strFilt As String, strTitle As String
    Dim docApp As Word.Application
    
    strFilt = "Word文件,*.doc; *.docx; *.docm"  '允許開啟的檔案字尾名
    strTitle = "請選擇要開啟的Word文件"          '對話方塊標題
    
    sFName = Application.GetOpenFilename(filefilter:=strFilt, Title:=strTitle)
    If sFName = "False" Then Exit Sub           '使用者取消選擇，則退出程式
    
    Set docApp = CreateObject("Word.Application")   '為docApp變數賦值
    docApp.Documents.Open sFName
    docApp.Visible = True
    docApp.Activate     '讓開啟後的檔案顯示在桌面（成為當前活動文件）
    
    Set docApp = Nothing
    
End Sub
 

效果：