内容导航:


一、excel密码怎么破解


操作方法:

  • 01

    打开excel工作表。

  • 02

    然后在Excel表中找到【视图】。

  • 03

    点开【宏】。

  • 04

    然后选择【录制宏】。

  • 05

    接着会弹出一个窗口,点击【确定】。

  • 06

    在此点开【宏】,点击【停止录制】。

  • 07

    然后再点击【宏】,弹出窗口点击【编辑】。

  • 08

    然后点击【模板1】,并清空右边红框里的代码,如下图。

  • 09

    然后把破解代码复制粘贴进入空白处(破解代码小编将在文章最底部分享给大家)。

  • 10

    然后在打开【查看宏】,点击执行破解代码。

  • 11

    会弹出一个框,是英文的,看不懂没关系,点击确定,解密需要一段时间。

  • 12

    破解代码:
    PublicSubAllInternalPasswords()
    'Breaksworksheetandworkbookstructurepasswords.BobMcCormick
    'probablyoriginatorofbasecodealgorithmmodifiedforcoverage
    'ofworkbookstructure/windowspasswordsandformultiplepasswords
    '
    'NormanHarkerandJEMcGimpsey27-Dec-2002(Version1.1)
    'Modified2003-Apr-04byJEM:Allmsgstoconstants,and
    'eliminateoneExitSub(Version1.1.1)
    'RevealshashedpasswordsNOToriginalpasswords
    ConstDBLSPACEAsString=vbNewLine&vbNewLine
    ConstAUTHORSAsString=DBLSPACE&vbNewLine&_
    "AdaptedfromBobMcCormickbasecodeby"&_
    "NormanHarkerandJEMcGimpsey"
    ConstHEADERAsString="AllInternalPasswordsUserMessage"
    ConstVERSIONAsString=DBLSPACE&"Version1.1.12003-Apr-04"
    ConstREPBACKAsString=DBLSPACE&"Pleasereportfailure"&_
    "tothemicrosoft.public.excel.programmingnewsgroup."
    ConstALLCLEARAsString=DBLSPACE&"Theworkbookshould"&_
    "nowbefreeofallpasswordprotection,somakesureyou:"&_
    DBLSPACE&"SAVEITNOW!"&DBLSPACE&"andalso"&_
    DBLSPACE&"BACKUP!,BACKUP!!,BACKUP!!!"&_
    DBLSPACE&"Also,rememberthatthepasswordwas"&_
    "putthereforareason.Don'tstuffupcrucialformulas"&_
    "ordata."&DBLSPACE&"Accessanduseofsomedata"&_
    "maybeanoffense.Ifindoubt,don't."
    ConstMSGNOPWORDS1AsString="Therewerenopasswordson"&_
    "sheets,orworkbookstructureorwindows."&AUTHORS&VERSION
    ConstMSGNOPWORDS2AsString="Therewasnoprotectionto"&_
    "workbookstructureorwindows."&DBLSPACE&_
    "Proceedingtounprotectsheets."&AUTHORS&VERSION
    ConstMSGTAKETIMEAsString="AfterpressingOKbuttonthis"&_
    "willtakesometime."&DBLSPACE&"Amountoftime"&_
    "dependsonhowmanydifferentpasswords,the"&_
    "passwords,andyourcomputer'sspecification."&DBLSPACE&_
    "Justbepatient!Makemeacoffee!"&AUTHORS&VERSION
    ConstMSGPWORDFOUND1AsString="YouhadaWorksheet"&_
    "StructureorWindowsPasswordset."&DBLSPACE&_
    "Thepasswordfoundwas:"&DBLSPACE&""&DBLSPACE&_
    "Noteitdownforpotentialfutureuseinotherworkbooksby"&_
    "thesamepersonwhosetthispassword."&DBLSPACE&_
    "Nowtocheckandclearotherpasswords."&AUTHORS&VERSION
    ConstMSGPWORDFOUND2AsString="YouhadaWorksheet"&_
    "passwordset."&DBLSPACE&"Thepasswordfoundwas:"&_
    DBLSPACE&""&DBLSPACE&"Noteitdownforpotential"&_
    "futureuseinotherworkbooksbysamepersonwho"&_
    "setthispassword."&DBLSPACE&"Nowtocheckandclear"&_
    "otherpasswords."&AUTHORS&VERSION
    ConstMSGONLYONEAsString="Onlystructure/windows"&_
    "protectedwiththepasswordthatwasjustfound."&_
    ALLCLEAR&AUTHORS&VERSION&REPBACK
    Dimw1AsWorksheet,w2AsWorksheet
    DimiAsInteger,jAsInteger,kAsInteger,lAsInteger
    DimmAsInteger,nAsInteger,i1AsInteger,i2AsInteger
    Dimi3AsInteger,i4AsInteger,i5AsInteger,i6AsInteger
    DimPWord1AsString
    DimShTagAsBoolean,WinTagAsBoolean

    Application.ScreenUpdating=False
    WithActiveWorkbook
    WinTag=.ProtectStructureOr.ProtectWindows
    EndWith
    ShTag=False
    ForEachw1InWorksheets
    ShTag=ShTagOrw1.ProtectContents
    Nextw1
    IfNotShTagAndNotWinTagThen
    MsgBoxMSGNOPWORDS1,vbInformation,HEADER
    ExitSub
    EndIf
    MsgBoxMSGTAKETIME,vbInformation,HEADER
    IfNotWinTagThen
    MsgBoxMSGNOPWORDS2,vbInformation,HEADER&nbs



二、excel文件加密了怎么解密


如果你遇到了加密的 Excel 文件,打开它需要以下步骤:

1.打开 Excel 软件:打开 Microsoft Excel 软件,然后点击菜单栏的 "文件"。
2.寻找加密文件:在文件菜单中选择 "打开",然后浏览你的计算机或文档文件夹,找到加密的 Excel 文件。
3.输入密码:当你双击要打开的加密文件时,会弹出一个对话框要求输入密码。输入正确的密码并点击 "确定"。
注意:如果你不知道密码或密码不正确,无法打开加密的 Excel 文件。
4.解密文件:一旦你输入了正确的密码,Excel 软件会解密文件并打开它。此时,你就可以对文件进行编辑和查看了。

如果你忘记了加密文件的密码,或者文件遇到了其他加密问题,可以尝试以下方法来解决:
a. 使用密码恢复方法:你可以尝试使用密码破解软件或密码恢复服务来恢复/破解加密的 Excel 文件的密码。请注意,这种方法可能需要专业技能和工具,并且在某些情况下可能违反法律规定,需要遵循法律和道德准则。
b. 与文件创建者联系:如果你不知道密码或遇到其他加密问题,你可以尝试联系文件的创建者或拥有者,询问他们提供密码或解密文件的方法。
c. 尝试其他备份文件:如果你有其他备份文件或副本,可以尝试打开这些文件来获取未加密的版本。
如果你无法打开加密的 Excel 文件,最好与文件的创建者或相关人员寻求帮助,以获取正确的密码或解决方案


三、excel文件加密怎么解除


excel设置了密码需解除,要从以下六个步骤来操作,具体的操作如下。

工具:机械革命S3Pro、Windows10、Microsoft Office2019.

1、打开加密excel表格,输入密码进入。

2、点击左上角的文件图标,进入功能选项。

3、点击文档加密选项,进入权限设置界面。

4、选择密码加密选项,点击进入进行密码设置。

5、把之前的密码删除,点击应用即可取消打开密码。

6、点击保存,上面的钥匙标识就消失了,再次打开就不需要输入密码了。