如何检查您的电脑是否已安装 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，将会弹出如下提示框。