学习啦>学习电脑>工具软件>办公软件学习>Excel教程>Excel2013教程>

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

锦晖分享

  在创建Excel工作表后,有时希望禁止对工作簿的另存为操作。要实现这种操作,可以通过Workbook对象的BeforeSave事件来实现。以下是学习啦小编为您带来的关于通过编程实现禁止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

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

  提示

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

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

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

猜你喜欢:

1.Excel中只读或副本方式打开工作簿的操作方法

2.Excel2010中使用共享工作簿进行协作的操作方法

3.Excel怎么创建指定名称的工作簿

4.excel工作簿怎么单独提取一个表单

5.Excel如何共享工作簿

    3758635