7行VBA代碼,輕鬆破解工作表保護密碼

2020-01-08     Excel自學成才

在我們的日常工作中,工作表不希望同事改動內容,我們通常會在審閱的,保護工作表裡面,設置一個密碼



這樣同事打開你的工作表,只能查看數據,不能編輯改動,編輯會彈出警告提示


有的時候,你設置了保護工作表密碼,你自己想編輯的時候,取消保護工作表的密碼忘記了,你也編輯不了,這個時候就尷尬了

今天教大學兩種方法來破解工作表的保護

方法一,使用壓縮包方法

將文件重命名,將後綴改成.rar格式

直接雙擊打開壓縮包,找到xl/worksheets下,是哪個工作表被保護了,就選擇哪個工作表,用內部查看器打開

按CTRL+F查找內容protect的位置,然後選中<>之間的內容,進行delete刪除掉


關閉的時候,在壓縮包裡面要選擇更新內容,然後將.rar格式改回.xlsx格式,

雙擊打開表格文件,工作表的保護密碼就被去除了,裡面的內容也可以自由的編輯了

方法二:使用VBA代碼法

上述的方法如果多個工作表都有保護密碼,要在多個表格裡面搜索protect,處理起來還是比較麻煩,建議大家使用下面的VBA代碼法,只需要一個複製粘貼即可搞定,多個工作表都可以同時去除


在開發工具,點擊VBA,然後右鍵,插入一個模塊

在模塊裡面輸入代碼,直接運行,就直接破解了


代碼如下:

Sub 破解工作表密碼()Dim a As WorksheetFor Each a In Worksheetsa.Protect AllowFiltering:=Truea.UnprotectNextEnd Sub

你學會了麼?動手試試吧~

文章來源: https://twgreatdaily.com/YoHyiG8BMH2_cNUg_KBv.html