一鍵加密Excel工作表公式

　　工作表中很多數據都是由公式計算生成的，那麼如何讓別人只看到計算的結果，而將使用的公式隱藏起來呢?今天我們就向大家介紹使用宏來解決這一問題。

　　一、創建宏

　　啟動Excel，依次選擇“工具”—“宏”—“錄制新宏”，在打開的窗口中輸入宏的名稱，並把“保存在”項設為“個人宏工作簿”，單擊“確定”按鈕進入宏錄制模式。此時我們可以在當前窗口中看到宏錄制的工具欄，單擊“停止錄制”退出宏的錄制。

　　退出後，在Excel中按下“Alt+F11”鍵，在打開的VB編輯窗口中選擇“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)，在實際的操作過程中需要將默認的888888換成自己的密碼，以免造成洩露。

　　電腦教程圖1

　　二、應用宏

　　在Excel中打開“工具”菜單中的“自定義”命令，在“命令”選項卡的“類別”中選擇“宏”，在“命令”中選擇“自定義按鈕”，並將其拖放到工具欄上，單擊工具欄上的按鈕，在彈出的窗口中選擇我們創建的宏名並保存設置。

　　至此，我們要加密時只需單擊該按鈕，就可以將當前工作表保護起來，並且默認密碼為888888，怎麼樣這樣的操作是不是夠方便呢。