如何在 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 中儲存和另存為選項,以突出顯示特定資料集。
資料結構
網路
RDBMS
作業系統
Java
iOS
HTML
CSS
Android
Python
C 程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP