2020年4月6日 星期一

Excel 工作表密碼保護破解法 - part2

Excel 工作表密碼保護破解法 - part2

睽違多年,再發一篇。
故事經過是這樣子....遇到一Excel檔,內有3個工作表,但保護活頁簿多達5個。
用了多年前發的文來解(Excel 2003 2007 工作表密碼保護破解法),結果跑到Excel沒回應,當住了。無解!好瞎~~~

所以再找另一解法如下:

VBA跳過保護密碼
在受保護的工作表標籤中,右鍵,選單中選擇"檢視程式碼"















在VBA編輯器中,貼上如下編碼:

----------------------------
Sub 破解()

ActiveSheet.Protect DrawingObjects:=True, CONTENTS:=True, AllowFiltering:=True

ActiveSheet.Protect DrawingObjects:=False, CONTENTS:=True, AllowFiltering:=True

ActiveSheet.Unprotect

End Sub

------------------------------

執行該編碼即可破解保護密碼。(記得儲存)

ps:這篇是用Excel 2016來解的。


沒有留言:

張貼留言