数据结构
网络
RDBMS
操作系统
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 编程
C++
C#
MongoDB
MySQL
Javascript
PHP
物理学
化学
生物学
数学
英语
经济学
心理学
社会学
服装设计
法律研究如何在 Excel 中禁用或不允许“保存”和“另存为”选项？
高效的电子表格程序 Excel 经常用于数据管理、计算和分析。在某些情况下，为了维护数据完整性或保护敏感信息，您可能希望限制用户保存或复制特定 Excel 文件。您可以通过本教程中的说明禁用或限制“保存”和“另存为”选项来管理文件的使用方式，并防止未经授权的更改或传播。无论您是在处理共享文档、重要报告还是机密文件，这些方法都将帮助您在 Excel 环境中实施适当的安全级别。
请注意，本文中介绍的技术可能涉及更改设置或使用 VBA（Visual Basic for Applications）代码，并且需要管理员权限。在实施这些限制之前，务必备份您的 Excel 文件，以便在必要时撤消任何更改。让我们继续了解限制或禁用 Excel 中“保存”和“另存为”选项的各种方法，以便您更好地控制电子表格文件。
禁用或不允许保存和另存为选项
在这里，我们将首先插入 VBA 代码以禁用保存选项，然后在同一工作表中添加另一段代码以禁用另存为选项。因此，让我们了解一个简单的过程，了解如何禁用或不允许在 Excel 中保存和另存为选项。
步骤 1
考虑任何 Excel 文件。
首先，右键单击工作表名称，然后选择“查看代码”以打开 VBA 应用程序。然后，双击此工作簿并将以下代码复制到文本框中。
右键单击 > 查看代码 > 双击 > 复制。
代码
Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.Saved = True End Sub
步骤 2
然后单击“保存”，并将工作表另存为宏启用模板。为此，请单击“保存”，选择目标位置，选择“类型”为宏启用模板，然后单击“确定”。
步骤 3
现在，再次在 VBA 应用程序中，对于“ThisWorkbook”窗口，将以下代码添加到现有代码中。
代码
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim xName As String
xName = "CancelBeforeSave"
If Not Evaluate("=ISREF('" & xName & "'!A1)") Then
Sheets.Add(after:=Worksheets(Worksheets.count)).Name = xName & ""
Sheets(xName & "").Move after:=Worksheets(Worksheets.count)
Sheets(xName & "").Visible = False
Exit Sub
End If
Cancel = True
End Sub
步骤 4
然后再次保存工作表并关闭它。您可以看到工作表已保存，并且禁用了保存和另存为选项。
结论
在本教程中，我们使用了一个简单的示例来演示如何禁用或不允许在 Excel 中保存和另存为选项，以突出显示特定数据集。
2K+ 次查看
