国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

Excel密碼保護的解除方法

2024-08-23 19:54:45
字體:
來源:轉載
供稿:網友

  Excel彈出“您試圖更改的單元格或圖表受保護,因而是只讀的。若要修改受保護單元格或圖表,請先使用‘撤消工作表保護’命令(在‘審閱’選項卡的‘更改’組中)來取消保護。可能會提示您輸入密碼。”窗口,如圖1。

Excel密碼保護的解除方法    CUOxin.COM教程

  出現這種情況,應該怎么解決呢?經過研究,找到了兩種破解Excel工作表保護碼的方法。

  一、VBA宏代碼破解法:

  第一步:打開該文件,先解除默認的“宏禁用”狀態,方法是點擊工具欄下的“選項”狀態按鈕,打開“Microsoft office安全選項”窗口,選擇其中的“啟用此內容”,“確定”退出(圖2);

 再切換到“視圖”選項卡,點擊“宏”→“錄制宏”,出現“錄制新宏”窗口,在“宏名”定義一個名稱為:PassWordBreaker(圖3),點擊“確定”退出;

  第二步:再點擊“宏”→“查看宏”,選擇“宏名”下的“PasswordBreaker”并點擊“編輯”,打開“Microsoft Visual Basic”編輯器,用如下內容替換右側窗口中的所有代碼:

  Sub PasswordBreaker()

  Dim i As Integer, j As Integer, k As Integer

  Dim l As Integer, m As Integer, n As Integer

  Dim i1 As Integer, i2 As Integer, i3 As Integer

  Dim i4 As Integer, i5 As Integer, i6 As Integer

  On Error Resume Next

  For i = 65 To 66: For j = 65 To 66: For k = 65 To 66

  For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66

  For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66

  For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126

  ActiveSheet.UnPRotect Chr(i) & Chr(j) & Chr(k) & _

  Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _

  Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

  If ActiveSheet.ProtectContents = False Then

  MsgBox "One usable password is " & Chr(i) & Chr(j) & _

  Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _

  Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

  ActiveWorkbook.Sheets(1).Select

  Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _

  Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _

  Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)

  Exit Sub

  End If

  Next: Next: Next: Next: Next: Next

  Next: Next: Next: Next: Next: Next

  End Sub

  第三步:再點擊“宏”→“查看宏”,選擇“宏名”下的“PasswordBreaker”并點擊“執行”,密碼就現形了(圖4)。

  第四步:切換“審閱”選項卡,點擊“撤消工作表保護”,然后輸入密碼即可解除鎖定。

:更多精彩教程請關注CUOxin.COM電腦教程欄目,CUOxin.COM電腦辦公群:189034526歡迎你的加入


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 化德县| 云龙县| 瑞昌市| 利辛县| 深州市| 澳门| 青岛市| 南部县| 裕民县| 九台市| 稷山县| 清苑县| 女性| 临安市| 铜鼓县| 顺平县| 枣强县| 安阳市| 太谷县| 德化县| 漾濞| 闽侯县| 阆中市| 隆昌县| 合阳县| 新竹县| 佳木斯市| 小金县| 息烽县| 什邡市| 天峨县| 信宜市| 博罗县| 金门县| 新疆| 三明市| 许昌县| 香港 | 平陆县| 白银市| 铜鼓县|