excel - 将excel VBA中另存为对话框上的 "Cancel"文本更改为 "Review"

Question

有没有办法将excel VBA中另存为对话框上的“取消”文本更改为“审阅”？

我不知道如何更改默认的 Yes, No, Cancel 设置。

将感谢您的意见。

Answer 1

不

为此，您需要:

使用 Workbook 拦截 SaveAs事件

如果用户正在使用 Save 则退出而不是 SaveAs

提供您自己定制的SaveAs用户表单(UserForm1.Show 下面作为未设计表单的示例行)

请注意 Events应该禁用以防止您的 UserForm Save 重新调用 Workbook_BeforeSave事件

全部完成 - 我会保留默认值!

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'exit on Save
If Not SaveAsUI Then Exit Sub
Application.EnableEvents = False
Cancel = True
UserForm1.Show
Application.EnableEvents = True
End Sub