将excel VBA中SaveAs对话框上的“取消”文本更改为“审核”

Question

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

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

非常感谢您的意见。

Answer 1

没有

要做到这一点，您需要：

1. 使用Workbook事件
拦截SaveAs
2. 如果用户使用的是Save而不是SaveAs
，请退出
3. 提供您自己的自定义SaveAs UserForm（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