Word VBA-自动恢复调用DocumentBeforeSave事件

Word VBA-自动恢复调用DocumentBeforeSave事件,vba,ms-word,Vba,Ms Word,在Word VBA中,我有一个名为Events的调用,其中包含以下代码: Public WithEvents EventSource As Word.Application Private Sub EventSource_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean) If oScript.DocType = diDocTypeScript Then WriteToTe

在Word VBA中,我有一个名为Events的调用,其中包含以下代码:

Public WithEvents EventSource As Word.Application

Private Sub EventSource_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
If oScript.DocType = diDocTypeScript Then

    WriteToTextLog " SaveAsUI = " & CStr(SaveAsUI) & "Path= " & Doc.Path & " Name= " & Doc.Name
    If SaveAsUI Then
        Call Me.SaveAsBox(Doc)
    Else
        oScript.DlgTimeLastSaved = Now()
        Doc.Save
        If oDlgApplication.DevelopMode Then MsgBox "Saving Document: " & Doc.FullName
    End If

    Cancel = True
End If
End Sub
现在的问题是,当自动恢复触发时,会自动调用此save方法,它会保存实际文件,而不是保存文件的备份版本,以防Word崩溃

那么,有没有一种方法可以识别自动保存恢复并使其保持原样呢

谢谢,
Tejas

顺便问一句,举办本次活动的原因是什么?在这种情况下没有意义。或者潜艇内部是否有其他代码?或者最初的想法是完全按照您要删除的内容执行…@KazJaw在保存事件之前,我正在检查我的文档。所以我真的需要控制它。我想你不明白我的意思。。。那么,您所展示的事件代码是否完整?请显示完整的事件代码。@KazJaw请现在检查完整节点。THNX你们有哪个office版本?你解决问题了吗?