- 相關推薦
自定按鈕保護Excel工作表（1）
[文章導讀]
我們在工具欄上添加四個按鈕，來完成保護（撤銷保護）操作……
我們在用Excel制作表格時，為了防止使用者修改或者復制工作表，常常通過執行“工具→保護→保護工作表（簿）”命令，并設置密碼加以保護。
如果經常要進行這樣的操作，上述過程就顯示有些麻煩了，下面我們在工具欄上添加四個按鈕，方便對工作表（簿）的保護和撤銷保護操作。
一、編輯宏
1、啟動Excel2003（其它版本請仿照操作），執行“工具→宏→Visual Basic編輯器”命令，進入“Visual Basic編輯器”窗口（如圖1）。
2、在右側“工程資源管理器”窗口中，選中“VBAProject(PERSONAL.XLS)”選項，執行“插入→模塊”命令，插入一個模塊（“模塊1”，參見圖1）。
注意：選中“VBAProject(PERSONAL.XLS)”選項，制作的宏對所有工作簿有效；如果選中“VBAProject(Book1)”選項（參見圖1），則制作的宏僅對Book1工作簿有效。
3、雙擊“模塊1”展開右側模塊代碼書寫窗口，將下述代碼輸入其中：
Sub 保護工作表()
ActiveSheet.Protect Password:="123456"
End Sub 字串9
Sub 撤銷表保護()
ActiveSheet.Unprotect ("123456")
End Sub 字串9
Sub 保護工作簿()
ActiveWorkbook.Protect Password:="654321"
End Sub 字串8
Sub 撤銷簿保護()
ActiveWorkbook.Unprotect ("654321")
End Sub
注意：①運行上述4個宏，依次實現“保護工作表”、“撤銷工作表保護”、“保護工作簿”、“撤銷工作簿保護”操作。
�、诤昝Q“保護工作表”等，你可以自動修改為其它字符。
�、邸氨Ｗo工作表”的密碼（123456）和“保護工作簿”的密碼（6543321），請根據你自己的情況設置，二者可以相同。
�、鼙Ｗo工作表（簿）和撤銷工作表（簿）保護的密碼要對應。
4、輸入完成后，關閉“Visual Basic編輯器”窗口返回。
【自定按鈕保護Excel工作表1】相關文章：
快速刪除Word不常用的按鈕和菜單07-31
解決Excel數值進位問題07-31
解決Excel求和產生的誤差07-31
Excel打印故障問答錦囊07-31
構造Excel動態圖表07-31
四招打造Excel函數高手07-31
巧用Excel幫助你查郵編07-31
Excel快速錄入小數技巧07-31
向Excel中快速輸入相同文本07-31
Excel中快速輸入有相同特征的數據07-31