设置主页 | 收藏本站 Excel学习网-公益型的EXCEL在线学习网站,助您轻松办公!

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

2021年01月06日 19:13 发布来源:Excel学习网

 有时候,您想在创建Excel工作表后禁止将工作簿保存为操作。要实现这种操作,可以通过Workbook对象的BeforeSave事件来实现。下面就是小编为您介绍的通过编程实现禁用Excel工作簿文件“另存为”的学习方法,希望对您有所帮助。

实现程序设计,禁止Excel工作簿文件“另存为”
启动Excel并打开VisualBasic编辑器,双击工程浏览器中的"ThisWorkbook"选项打开代码窗口,在其中输入程序代码,如图1所示。具体的程序代码如下所示:
PrivateSubWorkbook_BeforeSave(ByValSaveAsUIAsBoolean,CancelAsBoolean)
IfSaveAsUI=TrueThen
Cancel=True
MsgBox"当前文档禁止另存为操作!",vbOKOnly,"警告"
EndIf
EndSub
通过编程如何实现禁止Excel工作簿文件另存为
图1 在“代码”窗口中输入程序代码

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

提示
在对工作簿执行保存操作时,Workbook对象的BeforeSave事件被触发,其中SaveAsUI参数指定是否在保存工作簿时显示“另存为”对话框,并且在对工作簿执行另存为操作时,该参数值为True,否则为False。对于BeforeSave事件过程,将Cancel参数设置为True,并且在该过程结束后不保存工作簿。
切换到Excel,单击快速访问工具栏上的“保存为”按钮,程序会显示一个提示对话框,如图2所示。关闭该对话框后另存为操作被取消。
编写禁止将Excel工作簿文件保存为的方法。

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

图2 程序给出提示对话框禁止另存为操作
原创文章如转载请注明:转载自Excel学习网 [ http://www.excelxx.com/]
需要保留本文链接地址:http://www.excelxx.com/jiqiao/13031.html
分享到:
网站地图 | XML地图 | 免责声明 | 关于我们 | Excel学习网:优秀的EXCEL在线学习和资源分享网站。
版权所有: CopyRight © 2013-2018 www.excelcn.com All Rights Reserved.
豫ICP备12002644号