【原】別再求人了！Excel工作表被加密，這個方法2步刪除保護

復制下方代碼，然后按下快捷鍵ALT+F11調出vba窗口，然后找到對應的文件，點擊空白區域，之后點擊鼠標右鍵找到【插入】選擇【模塊】，將下方的代碼粘貼到模塊中，之后退出vba的窗口，來到當前保護的工作表中，按照放上動圖，點擊【開發工具】選擇【宏】找到對應的宏名稱運行即可

Sub 工作表保護()ActiveSheet.Protect AllowFiltering:=TrueActiveSheet.UnprotectMsgBox "工作表密碼已刪除"End Sub

工作薄保護，主要用于保護sheet的結構。防止sheet被誤刪，或者禁止修改sheet名字，就可以設置工作薄保護。在工作表保護的旁邊就是工作薄保護了

使用方法跟工作表保護是一樣的，我們就不再一一贅述了，大家只要復制下方代碼，新建模塊使用即可。

這個代碼的作用是將sheet完整的復制到一個新的Excel文件中，會跳出新文件，大家的保存一下

Sub 工作薄保護()ActiveWorkbook.Sheets.CopyDim sh As WorksheetFor Each sh In ActiveWorkbook.Sheetssh.Visible = xlSheetVisibleNext shMsgBox "工作薄文件已全部復制，請另存新文件"End Sub

以上就是今天分享的全部內容，對于Excel的打開密碼，現在還沒什么好的辦法，一般都是暴力破解，就不列舉了。