小夥伴們好啊,今天咱們說說如何破解工作簿保護和工作表保護的問題。
注意咱們說的工作簿保護,不是文檔的打開許可權密碼,如果設置了文檔打開許可權密碼,在高版本中破解的成功率是非常低的。
如果打開一個Excel文檔時,直接彈出這麼個對話框,那就基本沒指望了,早點洗洗睡吧:

我說的工作簿保護是這裡:

在這個地方設置工作簿保護後,將對工作表進行刪除、移動、新建、隱藏或者取消隱藏,以及工作表重命名等操作。
如果工作簿保護密碼忘記了怎麼辦?
右鍵單擊工作表標籤→【查看代碼】,然後插入模塊,複製以下代碼,粘貼到代碼區域:
- 點擊運行按鈕,稍等片刻,就會出現一個去掉保護的工作簿克隆版,咱們只要按Ctrl+S鍵,將這個工作簿保存一下就好了。
Sub 工作簿密碼破解() ActiveWorkbook.Sheets.Copy For Each sh In ActiveWorkbook.Sheets sh.Visible = True NextEnd Su
接下來咱們再說說如何破解工作表保護。
有時我們為了防止別人修改工作表內容,會通過【審閱】→【保護工作表】來設置工作表的保護密碼。

如果不小心自己忘了密碼或者別人的文檔咱們沒有密碼,怎麼辦呢?
只要參考前一個動畫中的步驟,右鍵單擊工作表標籤→【查看代碼】,然後插入模塊,複製以下代碼,粘貼到代碼區域,點一下運行按鈕就OK了:
Sub jp()Dim sht As WorksheetFor Each sht In Worksheetssht.Protect AllowFiltering:=Truesht.UnprotectNextEnd Sub好了,今天咱們的內容就是這些吧,祝各位小夥伴一天好心情!
原創文章,作者:投稿專員,如若轉載,請註明出處:https://www.506064.com/zh-tw/n/225260.html
微信掃一掃
支付寶掃一掃