如何通过Excel VBA禁用或延迟MS Word自动保存提升导出速度

我有一个可向Word导出约100页大量数据的Excel文件，希望在导出过程中关闭自动保存功能以提升导出速度，目前已尝试多种方法均未达到预期效果（注：相关代码编写在执行导出操作的Excel文件中）。

已尝试的初始方案 #

方案1：设置Word文档的AutoSaveOn属性 #

oWordfile.AutoSaveOn = False   'oWordfile 为 Word.Document 类型
MsgBox "Autosave state: " & oWordfile.AutoSaveOn

代码运行过程中定时通过消息框确认自动保存状态，弹窗始终显示AutoSaveOn属性为False，但目标Word文件的标题栏仍显示约每5分钟执行一次保存操作。

方案2：修改Word自动恢复保存间隔 #

oWordApp.Options.SaveInterval = 30    'oWordApp 为 Word.Application 类型

代码执行完成后确认Word的自动恢复（AutoRecover）保存间隔已被修改为30分钟，但导出过程中Word仍每5分钟出现一次保存提示。

以上两种方法均未改变Word的实际运行表现，初步推测是修改的配置项有误，但不清楚还有哪些设置项控制自动保存功能。

后续补充测试（收到Byrd答复后） #

方案3：拦截保存事件 #

Word侧实现代码

Private WithEvents App As Word.Application

Private Sub Document_Open()
  Set App = Word.Application
End Sub

Private Sub App_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
  If MsgBox("Save Document?", vbYesNo, "Word: BeforeSave") = vbNo Then
    Cancel = True
  End If
End Sub

Excel侧实现代码

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  If MsgBox("Save File?", vbYesNo, "Excel: BeforeSave") = vbNo Then
    Cancel = True
  End If
End Sub

测试时临时通过消息框判断是否允许保存，测试结论如下：

• 代码或用户主动触发Excel、Word的保存事件时，都会正常弹出提示框
• Word保持打开状态时，设置为30分钟间隔的AutoRecover保存事件触发时，也会弹出提示
• 但在Excel向Word导出数据的代码执行过程中，Word仍每5分钟显示保存状态，且不会触发BeforeSave事件

相关现象截图：

• Word标题栏显示正在保存截图
• Word标题栏显示文件已保存截图

后续进一步测试发现：尽管导出过程中标题栏显示正在保存，但文件实际并未被写入磁盘。导出完成后通过任务管理器强制关闭Word，核查发现文件内容和代码执行前完全一致，AutoRecover路径下也没有生成可恢复的文件版本。目前暂不清楚该现象的触发原因，仅确认标题栏显示保存进行中时，导出速度会出现大幅下降。

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