巧用宏命令來為Excel工作表公式加密碼

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

　　一、創(chuàng)建宏

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

　　退出后，在Excel中按下“Alt+F11”鍵，在打開的VB編輯窗口中選擇“VBAProject(PERSONAL.XLS)”—“模塊”—“模塊1”，然后將右側(cè)窗口中的內(nèi)容替換成：

　　Sub密碼保護()//宏的名稱

　　ActiveSheet.Unprotect("888888")//默認(rèn)密碼

　　Cells.Select

　　Selection.Locked=False

　　Selection.SpecialCells(xlCellTypeFormulas,23).Select

　　Selection.Locked=True

　　Selection.FormulaHidden=True

　　ActiveSheet.Protect("123456")

　　ActiveSheet.EnableSelection=xlUnlockedCells

　　EndSub

　　做好之后保存設(shè)置退出編輯窗口。當(dāng)然，在自己的Excel中，還是要將默認(rèn)的888888換成自己的密碼，以免造成泄露。

　　二、應(yīng)用宏

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

　　至此，我們要加密時只需單擊該按鈕，就可以將當(dāng)前工作表保護起來，并且默認(rèn)密碼為888888，怎么樣這樣的操作是不是夠方便呢。