Hey Simon，这是一个典型的Excel信任机制与事件触发时机冲突的问题，我来帮你拆解原因和可行的解决方案：

这个1004错误的核心是Excel信任中心的权限初始化延迟。在你提到的特定Office 365版本（1902内部版本11328.20564）中，当用户从非信任位置下载并打开宏工作簿时，即便点击了“启用内容”，Excel内部的权限同步和对象模型解锁流程可能还没完全走完。而Workbook_Open或Workbook_Activate事件触发得太早，导致调用Sheets("XYZ").Activate时，Excel还没授予对该工作表的激活权限，于是抛出了运行时错误。当文件在信任位置时，Excel会直接跳过权限校验的延迟环节，所以代码能正常运行。

• 延迟执行激活代码：用Application.OnTime把激活操作推迟几秒，给Excel足够时间完成权限同步。示例代码如下：

  ' 放在ThisWorkbook模块里
  Private Sub Workbook_Open()
      ' 先执行不需要激活工作表的初始化操作
      Application.OnTime Now + TimeValue("00:00:01"), "SafeActivateXYZSheet"
  End Sub
  
  ' 新建一个标准模块（比如Module1），放这个子程序
  Public Sub SafeActivateXYZSheet()
      ' 加个错误处理兜底，防止延迟后仍有异常
      On Error Resume Next
      ThisWorkbook.Sheets("XYZ").Activate
      ' 如果有后续依赖激活状态的操作，在这里继续写
      On Error GoTo 0
  End Sub
  

  你可以根据实际情况调整延迟时间，0.5秒有时候也足够。

• 砍掉不必要的Activate操作：很多场景下激活工作表根本不是必须的，直接通过对象引用操作数据/格式不仅更高效，还能彻底绕过权限问题。比如：

  ' 不用激活，直接操作XYZ工作表的A1单元格
  ThisWorkbook.Sheets("XYZ").Range("A1").Value = "报表初始化完成"
  

  这种写法更健壮，也符合VBA的最佳实践。

• 引导用户配置信任位置：虽然这是客户端操作，但可以给用户写个简单的步骤说明，让他们把你的服务器路径添加到Excel受信任位置：

  文件 > 选项 > 信任中心 > 信任中心设置 > 受信任位置 > 添加新位置，输入服务器共享路径并勾选“同时信任此位置的子文件夹”

• 尝试兼容模式运行：让出现问题的用户右键点击工作簿→属性→兼容性，勾选“以兼容模式运行这个程序”，选一个较早的Excel版本（比如Excel 2016），某些版本的兼容性bug在兼容模式下会被修复。

微软提供了合法的渠道获取旧版Office 365用于测试：

• Office 365开发者订阅：如果你有开发者订阅，可以用Office部署工具（Office Deployment Tool）下载指定版本的Office 365。通过配置configuration.xml文件指定你需要的版本号（比如1902的内部版本11328.20564），就能精准下载对应版本来复现问题。
• 微软测试虚拟机：微软的MDOP（Microsoft Desktop Optimization Pack）包含预装旧版Office的虚拟机，适合做兼容性测试，但需要对应的企业订阅权限。

注意不要用非官方的镜像文件，避免版权和安全风险。

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