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

excel文件改为工作簿模式 通过编程实现禁止Excel工作簿文件“另存为”的方法，在这个电脑办公的时代，要是不掌握点office办公软件相关的知识那你简直就没有晋升的机会了，excel文件改为工作簿模式这个问题，不知道是否也困扰着你，关于excel文件改为工作簿模式 通过编程实现禁止Excel工作簿文件“另存为”的方法看完这篇文章你一定会有所收获，我们一起了解下吧！

在创建Excel工作表后，有时希望禁止对工作簿的另存为操作。要实现这种操作，可以通过Workbook对象的BeforeSave事件来实现，本文介绍通过编程实现禁止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　程序给出提示对话框禁止另存为操作