如何用VBA检测Excel工作簿是用户打开还是被链接文档触发打开？

可以通过判断Excel实例的启动上下文，在Workbook_Open事件中跳过非用户手动打开时的提示，以下是两种可靠的实现方式：

方法一：检查Application.UserControl属性 #

这个属性能准确区分Excel实例是用户手动启动，还是被其他程序（如PowerPoint）通过自动化调用启动的：

Private Sub Workbook_Open()
    ' 仅在用户主动打开工作簿时显示提示
    If Application.UserControl Then
        ' 替换成你原本的用户提示代码
        MsgBox "请执行相关操作..."
    Else
        ' 由PowerPoint等程序调用更新链接，跳过提示
        ' 标记工作簿为已保存，避免后续弹出保存提示
        ThisWorkbook.Saved = True
    End If
End Sub

• Application.UserControl = True：表示Excel是用户手动打开的，正常显示提示；
• Application.UserControl = False：表示Excel是被其他应用通过OLE自动化启动的（比如PowerPoint更新链接的场景），直接跳过提示。

方法二：检查Excel窗口可见性 #

如果UserControl在某些特殊场景下判断不准确，可以通过窗口可见性来区分：

Private Sub Workbook_Open()
    ' 仅当Excel窗口可见时（用户打开）显示提示
    If Application.Visible Then
        MsgBox "请执行相关操作..."
    Else
        ' 后台调用场景，跳过提示
        ThisWorkbook.Saved = True
    End If
End Sub

用户手动打开时Excel窗口默认可见，而PowerPoint更新链接时会启动后台Excel实例，窗口处于不可见状态。

补充说明 #

你之前监控的ThisWorkbook.ReadOnly、Application.Interactive、Application.IsSandboxed确实无法区分这两种打开场景，因为链接更新时工作簿不一定是只读状态，Interactive默认保持启用，IsSandboxed仅适用于受保护的沙箱环境，和链接更新无关。

内容的提问来源于stack exchange，提问作者katchnb