資料結構
網路
關係型資料庫管理系統
作業系統
Java
MS Excel
iOS
HTML
CSS
Android
Python
C 程式設計
C++
C#
MongoDB
MySQL
Javascript
PHP
物理學
化學
生物學
數學
英語
經濟學
心理學
社會學
服裝設計
法律研究如何在開啟 Excel 檔案時自動隱藏特定工作表？
在 Excel 中，您可能希望自動隱藏特定工作表，但又不想刪除它，因為它包含您不想共享的敏感資訊。我們可以透過利用 VBA 應用程式來實現這一點。本文將幫助您瞭解如何在開啟 Excel 檔案時自動隱藏特定工作表。本教程將幫助您瞭解如何在 Excel 中自動隱藏單個工作表和多個工作表。
自動隱藏單個工作表
在這裡，我們將 VBA 程式碼應用於整個工作簿，並在程式碼中提及工作表名稱。讓我們來看一個簡單的過程，瞭解如何在開啟 Excel 檔案時自動隱藏單個工作表。
步驟 1
讓我們考慮一個包含多個工作表 Excel 工作簿。右鍵單擊任何工作表名稱並選擇“檢視程式碼”以開啟 VBA 應用程式。然後雙擊此工作簿並在文字框中鍵入程式，如下面的圖片所示。
示例
Private Sub Workbook_Open() 'Updated By Nirmal Sheets("Sheet3").Visible = False End Sub
在程式碼中，“Shtee3”是我們隱藏的工作表名稱。
步驟 2
現在，將工作表另存為啟用宏的工作簿並關閉它。下次開啟它時，單擊“啟用程式碼”按鈕即可自動隱藏工作表 3。
自動隱藏多個工作表
這裡將對工作表名稱進行分組並在程式碼中提及。讓我們來看一個簡單的過程，瞭解如何在 Excel 工作簿中自動隱藏多個工作表。
步驟 1
讓我們考慮一個包含多個工作表的 Excel 工作簿。在任何工作表中，輸入您要隱藏的工作表名稱列表，選擇它們併為其命名，如下面的圖片所示。
步驟 2
現在右鍵單擊任何工作表名稱並選擇“檢視程式碼”以開啟 VBA 應用程式，然後雙擊此工作簿並在文字框中鍵入程式，如下面的圖片所示。
示例
Private Sub Workbook_BeforeClose(Cancel As Boolean) 'Update By Nimral Dim ws As Worksheet For Each ws In Worksheets ws.Visible = xlSheetVisible Next ws End Sub Private Sub Workbook_Open() Dim ws As Worksheet For Each ws In Worksheets If WorksheetFunction.CountIf([Hidesheets], ws.Name) > 0 Then ws.Visible = xlSheetHidden MsgBox ws.Name & "Has been hidden!", vbInformation, "Kutools for Excel" Else ws.Visible = xlSheetVisible End If Next ws Set ws = Nothing End Sub
步驟 3
關閉工作表，將其另存為啟用宏的工作簿，然後關閉它。下次開啟工作表時，單擊“啟用程式碼”按鈕即可自動隱藏它，如下面的圖片所示。
結論
在本教程中，我們使用了一個簡單的示例來演示如何在 Excel 工作簿中自動隱藏多個工作表。
更新於：2023年1月10日
721 次瀏覽
廣告