萬盛學電腦網

您现在的位置: 萬盛學電腦網 >> 辦公室軟體 >  >> Excel 教學 >> Excel 綜合

Excel 一鍵加密工作表公式:錄製巨集鎖定公式儲存格並隱藏公式,工具列按鈕即點即用

保護工作表公式不被竊視/修改,錄製巨集綁定工具列按鈕,一鍵完成「解除保護→解鎖全表→鎖定公式儲存格→隱藏公式→保護工作表→僅允許選取未鎖定儲存格」全流程。

建立巨集

  1. 工具 → 巨集 → 錄製新巨集 → 名稱 密碼保護 → 存「個人巨集活頁簿」 → 確定 → 立即點「停止錄製」(先建空殼)。
  2. Alt+F11 開啟 VBE → 選 VBAProject(PERSONAL.XLS) → 模組1 → 替換為:
Sub 密碼保護()
    ActiveSheet.Unprotect ("888888")   ' 原保護密碼,實務請改強密碼
    Cells.Select
    Selection.Locked = False           ' 先全解鎖
    Selection.SpecialCells(xlCellTypeFormulas, 23).Select  ' 選所有公式儲存格
    Selection.Locked = True            ' 鎖定公式儲存格
    Selection.FormulaHidden = True     ' 隱藏公式
    ActiveSheet.Protect ("123456")     ' 新保護密碼,實務請改強密碼
    ActiveSheet.EnableSelection = xlUnlockedCells  ' 僅允許選取未鎖定儲存格
End Sub
  1. 存檔關閉 VBE。

建立工具列按鈕

  1. 工具 → 自訂 → 「指令」頁籤 → 類別「巨集」 → 將「自訂按鈕」拖至工具列。
  2. 右鍵按鈕 → 「指定巨集」→ 選 密碼保護 → 確定。

此后點一下按鈕,當前工作表公式即被鎖定隱藏,僅留輸入區可編輯。務必修改預設密碼 888888/123456 防洩露。巨集存於 PERSONAL.XLSB,所有活頁簿通用。

copyright © 萬盛學電腦網 all rights reserved