有没有办法将excel VBA中另存为对话框上的“取消”文本更改为“审阅”?
我不知道如何更改默认的 Yes, No, Cancel 设置。
将感谢您的意见。
不
为此,您需要:
Workbook
使用事件拦截 SaveAsSave
如果用户正在使用而不是退出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