01破解保護工作表密碼?
開啟工作表保護后可以防止別人修改數據,用鼠標雙擊保護過的表格會跳出彈窗禁止提示。?
如果又要破解,辦法如下:?
工作表標簽頁點擊鼠標右鍵,選擇[查看代碼],將下面的代碼復制到彈出的編輯界面:按照下方動圖操作即可,非常簡易。
Sub?UnProtct()
????MsgBox?"破解提示:當要求輸入密碼時請點擊取消!”"
????Application.DisplayAlerts?=?False
????On?Error?Resume?Next
????Dim?sht?As?Worksheet
????For?Each?sht?In?Worksheets
????????With?sht
????????????.Protect?DrawingObjects:=True,?Contents:=True,?Scenarios:=True,?AllowFiltering:=True,?AllowUsingPivotTables:=True
????????????.Protect?DrawingObjects:=False,?Contents:=True,?Scenarios:=False,?AllowFiltering:=True,?AllowUsingPivotTables:=True
????????????.Protect?DrawingObjects:=True,?Contents:=True,?Scenarios:=False,?AllowFiltering:=True,?AllowUsingPivotTables:=True
????????????.Protect?DrawingObjects:=False,?Contents:=True,?Scenarios:=True,?AllowFiltering:=True,?AllowUsingPivotTables:=True
????????????.Unprotect
????????End?With
????Next
????MsgBox?"ok"
End?Sub
復制進去后點擊代碼窗口上方的三角形運行代碼即可。??
現在您已經學會了破解工作表密碼了,下面我們學習如何破解工作簿密碼。? ?
02破解保護工作簿密碼??
開啟保護工作簿之后可以防止其他用戶查看隱藏的工作表,添加、移動或隱藏工作表以及重命名工作表。??
可以看到隱藏、重命名之類的按鈕都是灰色的。??
破解的方法如下:? 同樣是在工作表標簽頁點擊鼠標右鍵,選擇[查看代碼],在彈出的VBA編輯界面輸入以下代碼:步驟跟上面破解工作表一樣,大家將代碼復制粘貼到VBA編輯器即可。
Sub?test()
????ActiveWorkbook.Sheets.Copy
????For?Each?sh?In?ActiveWorkbook.Sheets
????????sh.Visible?=?True
????Next
End?Sub
點擊運行后,我們的工作簿密碼保護已經解除,在表格上接下來就可以做修改、刪除,新增等動作了。?
總結下,本篇文章我們學到了破解工作表的密碼和工作簿保護密碼。這兩項保護同學們以后都可以解決了----(但是如果你的工作簿打開密碼忘記了,那就不是我們上面的辦法可以破解的了,除了暴力軟件破解,基本沒有其他好的辦法)