2021通过编程如何实现禁止EXCEL工作簿文件另存为

上传人:郭** 文档编号:157722026 上传时间:2020-12-26 格式:DOC 页数:3 大小:14.15KB
返回 下载 相关 举报
2021通过编程如何实现禁止EXCEL工作簿文件另存为_第1页
第1页 / 共3页
2021通过编程如何实现禁止EXCEL工作簿文件另存为_第2页
第2页 / 共3页
2021通过编程如何实现禁止EXCEL工作簿文件另存为_第3页
第3页 / 共3页
亲,该文档总共3页,全部预览完了,如果喜欢就下载吧!
资源描述

《2021通过编程如何实现禁止EXCEL工作簿文件另存为》由会员分享,可在线阅读,更多相关《2021通过编程如何实现禁止EXCEL工作簿文件另存为(3页珍藏版)》请在金锄头文库上搜索。

1、通过编程如何实现禁止Excel工作簿文件另存为 在创建Excel工作表后,有时希望禁止对工作簿的另存为操作。要实现这种操作,可以通过Workbook对象的BeforeSave事件来实现。以下是 _为您带来的关于通过编程实现禁止Excel工作簿文件“另存为”,希望对您有所帮助。 1、启动Excel并打开Visual Basic器,在工程资源管理器中双击ThisWorkbook选项打开“代码”窗口,在其中输入程序代码,如图1所示。具体的程序代码如下所示: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean,Cancel As Bool

2、ean) If SaveAsUI=True Then Cancel=True MsgBox 当前文档禁止另存为操作!,vbOKOnly,警告 End If End Sub 图1 在“代码”窗口中输入程序代码 提示 Workbook对象的BeforeSave事件在对工作簿进行保存操作时触发,其中SaveAsUI参数指定保存工作簿时是否显示“另存为”对话框,当对工作簿进行另存为操作时,该参数值为True,否则为False。在BeforeSave事件过程中,将Cancel参数值设置为True,过程结束后将不保存工作簿。 2、切换到Excel,在快速访问工具栏中单击“另存为”按钮,程序给出提示对话框,如图2所示。关闭该对话框后另存为操作被取消。 图2 程序给出提示对话框禁止另存为操作 猜你喜欢: 1. 2. 3. 4. 5. 模板,内容仅供参考

展开阅读全文
相关资源
正为您匹配相似的精品文档
相关搜索

最新文档


当前位置:首页 > 办公文档 > 其它办公文档

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号