日常工作中,有時為了防止别人修改表格結構或者表格中的公式,我們經常把工作表鎖加密鎖定。但是如果密碼忘記了,該如何辦呢?或者想解開别人設置密碼的工作表蓋怎麼做呢?
如果你這個時候百度的話,大多數答案給的解決方法就是将文件後綴名修改為RAR,然後再尋找某個代碼,然後再巴拉巴拉一堆,步驟簡直不要太多。我想說這種方法太複雜了。有比他簡單10倍的方法。
❶打開excel→開發工具→點Visual Basic(打開代碼編輯界面)
❷插入模塊→将下面的代碼粘貼進去模塊
Sub 删除密碼() '利用Excel的BUG實現清除密碼
'對工作表加密,記住其中Protect的參數變化
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
ActiveSheet.Unprotect '解密
End Sub
❸點擊綠色小三角,運行代碼,瞬間破解
是不是很簡單?比改文件後綴查找删除密碼代碼方便多了。
你學會了嗎?
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!