1

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

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

将感谢您的意见。

4

1 回答 1

3

为此,您需要:

  1. Workbook使用事件拦截 SaveAs
  2. Save如果用户正在使用而不是退出SaveAs
  3. 提供您自己的自定义用户表单SaveAsUserForm1.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
于 2013-04-10T05:03:34.877 回答