首页 > 软件操作教程 > 办公软件 > Excel
题目内容

通过编程实现禁止Excel工作簿文件“另存为”的方法

题目答案

1、启动Excel并打开Visual Basic编辑器,在工程资源管理器中双击"ThisWorkbook"选项打开“代码”窗口,在其中输入程序代码,如图1所示。具体的程序代码如下所示:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean,Cancel As Boolean)

If SaveAsUI=True Then

Cancel=True

MsgBox "当前文档禁止另存为操作!",vbOKOnly,"警告"

End If

End Sub

image.png

图1 在“代码”窗口中输入程序代码

提示

Workbook对象的BeforeSave事件在对工作簿进行保存操作时触发,其中SaveAsUI参数指定保存工作簿时是否显示“另存为”对话框,当对工作簿进行另存为操作时,该参数值为True,否则为False。在BeforeSave事件过程中,将Cancel参数值设置为True,过程结束后将不保存工作簿。

2、切换到Excel,在快速访问工具栏中单击“另存为”按钮,程序给出提示对话框,如图2所示。关闭该对话框后另存为操作被取消。

image.png

图2 程序给出提示对话框禁止另存为操作

网友评论(共0条评论)

请自觉遵守互联网相关政策法规,评论内容只代表网友观点!

最新评论

点击加载更多评论>>

软件操作 新人注册送三重礼

已有 22658 名学员学习以下课程通过考试

相关视频试题

最需教育客户端 软件问题一手掌握

去 App Store 免费下载 iOS 客户端