如何確認您的電腦是否已安裝 Outlook？

當您轉換到新職位並使用新電腦時，可能需要確認系統是否已安裝 Outlook。那麼，在使用 Microsoft Excel 或 Word 文件時，該如何快速檢查 Outlook 是否存在？以下提供一種快速完成此操作的方法。

使用 VBA 程式碼檢查是否已安裝 Outlook

---

使用 VBA 程式碼檢查是否已安裝 Outlook

請依照下列步驟，確認您的電腦是否已安裝 Outlook。

1. 若您正在使用 Microsoft Excel 或 Word，請按下 Alt+F11 鍵，立即開啟 Microsoft Visual Basic for Applications 視窗！

2. 在 Microsoft Visual Basic for Applications 視窗中，點選插入＞ 模組，並將下方的 VBA 程式碼複製到模組視窗中。請參見截圖：

VBA 程式碼：檢查您的電腦是否已安裝 Outlook

Sub Outlook_Check()
    Dim xOLApp As Object
    On Error GoTo L1
    Set xOLApp = CreateObject("Outlook.Application")
    If Not xOLApp Is Nothing Then
        MsgBox "Outlook " & xOLApp.Version & " installed", vbExclamation, "Kutools for Outlook"
        Set xOLApp = Nothing
        Exit Sub
    End If
L1: MsgBox "Outlook not installed", vbExclamation, "Kutools for Outlook"
End Sub

3. 按下 F5 鍵以執行程式碼。

若您的電腦已安裝 Outlook，將會彈出一個 Kutools for Outlook 對話方塊，其中即顯示已安裝的 Outlook 版本，如下方截圖所示。

若未安裝 Outlook，將顯示如下提示方塊。