歡迎來到天天文庫
瀏覽記錄
ID:12288968
大?。?3.50 KB
頁數:3頁
時間:2018-07-16
《excel工作表使用技巧》由會員上傳分享,免費在線閱讀,更多相關內容在行業(yè)資料-天天文庫。
1、Excel工作表保護大法Excel表格是我們工作中經常用到的,而它往往涉及統(tǒng)計數據等敏感問題,因此,Excel表格的保護也是經常遇到的問題,如何安全使用Excel呢?我們常用到的是Excel“工具”菜單提供的“保護工作表”和“保護工作簿”功能。有沒有其他方法呢?用宏進行“顯式”加密在需要加密的Excel表中,點擊[工具]→[宏]→[VisualBasic編輯器],打開“工程資源管理器”,雙擊該工作表,在右邊的是設置該表屬性的編輯窗口,單擊該窗口左上方的下拉列表框,選擇Worksheet,再從該窗口右上方的列表框中選擇Activate(激活)(如圖)。添加如下代碼:(假設“
2、123”為密碼,Sheet1為限制權限表格,Sheet2為工作簿中為任何適合的工作表)PrivateSubWorksheet_Activate()Sheets("sheet1").Cells.Font.ColorIndex=2’設置文字顏色為白色IfApplication.InputBox("請輸入密碼:")=123Then?Range("A1").SelectActiveSheet.Cells.Font.ColorIndex=56’設置文字顏色為黑色ElseMsgBox"密碼錯誤,即將退出!"Sheets("sheet2").SelectEndIfEndSub每次當你選
3、擇該“加密”表的時候都會彈出對話框要求輸入密碼,正確則進入該表(Sheet1),否則會選擇其他表(Sheet2)。用宏進行“隱式”加密“顯式”加密,雖然可以讓沒有密碼的使用者無法看到“加密”表格,但是每次選擇該表格時都會彈出對話框,實在不方便而且給其他用戶一種被防范的不舒服感覺。于是筆者就想出了下面的“隱式”加密方法。假如要加密的是Sheet1,我們可以設置在Sheet2的“A1”單元格為密碼的輸入處。于是修改以上代碼如下:PrivateSubWorksheet_Activate()Sheets("sheet1").Cells.Font.ColorIndex=2’設置文字
4、顏色為白色IfSheets("sheet2").Cells(1,1)=123ThenRange("A1").SelectActiveSheet.Cells.Font.ColorIndex=56’設置文字顏色為黑色EndIfEndSub設置好以后,只有Sheet2的(A1)單元格為密碼“123”時“加密”表Sheet1的內容才顯示出來,否則就是透明的,神不知鬼不覺;所謂“隱式”?!半[式”加密雖然保證了沒有密碼的用戶不能查看“加密”表格的內容,但是不能保護其他用戶對其進行修改。所以我們要綜合運用上面所說的“保護表格”和“隱式加密”對要保密的表格進行設置。上面是筆者在實踐中綜合
5、出來的加密經驗,希望能給大家?guī)矸奖?,也恭候大家的指點交流。
此文檔下載收益歸作者所有