vba - 在 word doc 中停止保存功能

Question

我想知道是否有一种方法可以通过 VBA 阻止 word doc 的“另存为”功能（即能够更改名称）。用户应该只能像填写了某些必填字段一样进行保存。我不确定这是否可能，因为我真的没有找到关于这个话题的任何东西。

标签： vbams-word

Answer 1

关于如何订阅事件的一个不错的答案可以在这个问题中找到：如何在保存之前在 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)
    Cancel = True
    MsgBox ("Cancelled")
End Sub

这将在您打开文档后运行