电脑破解excel工作表密码的方法

???
?excel是办公软件microsoftoffice的组件之一，win7正式版系统电脑在工作中使用excel工作表的时候，一些重要的文件我们都会给它设置上密码。但是时间久了，容易把密码忘记了，那么有什么办法可以破解excel工作表密码呢？接下去我们一起分享电脑破解excel工作表密码的方法。
?
具体方法如下：
1、打开excel工作表；
2、然后在excel表中找到【视图】；
3、点开【宏】；
4、然后选择【录制宏】；
5、接着会弹出一个窗口，点击【确定】；
6、在此点开【宏】，点击【停止录制】；
7、然后再点击【宏】，弹出窗口点击【编辑】；
8、然后点击【模板1】，并清空右边红框里的代码；
9、然后把破解代码复制粘贴进入空白处；
10、然后在打开【查看宏】，点击执行破解代码；
11、会弹出一个框，是英文的，看不懂没关系，点击确定，解密需要一段时间；
破解代码:
public sub allinternalpasswords()
\’ breaks worksheet and workbook structure passwords. bob mccormick
\’ probably originator of base code algorithm modified for coverage
\’ of workbook structure / windows passwords and for multiple passwords
\’
\’ norman harker and je mcgimpsey 27-dec-2002 (version 1.1)
\’ modified 2003-apr-04 by jem: all msgs to constants, and
\’ eliminate one exit sub (version 1.1.1)
\’ reveals hashed passwords not original passwords
const dblspace as string = vbnewline & vbnewline
const authors as string = dblspace & vbnewline & _
\”adapted from bob mccormick base code by\” & _
\”norman harker and je mcgimpsey\”
const header as string = \”allinternalpasswords user message\”
const version as string = dblspace & \”version 1.1.1 2003-apr-04\”
const repback as string = dblspace & \”please report failure \” & _
\”to the microsoft.public.excel.programming newsgroup.\”
const allclear as string = dblspace & \”the workbook should \” & _
\”now be free of all password protection, so make sure you:\” & _
dblspace & \”save it now!\” & dblspace & \”and also\” & _
dblspace & \”backup!, backup!!, backup!!!\” & _
dblspace & \”also, remember that the password was \” & _
\”put there for a reason. don\’t stuff up crucial formulas \” & _
\”or data.\” & dblspace & \”access and use of some data \” & _
\”may be an offense. if in doubt, don\’t.\”
const msgnopwords1 as string = \”there were no passwords on \” & _
\”sheets, or workbook structure or windows.\” & authors & version
const msgnopwords2 as string = \”there was no protection to \” & _
\”workbook structure or windows.\” & dblspace & _
\”proceeding to unprotect sheets.\” & authors & version
const msgtaketime as string = \”after pressing ok button this \” & _
\”will take some time.\” & dblspace & \”amount of time \” & _
\”depends on how many different passwords, the \” & _
\”passwords, and your computer\’s specification.\” & dblspace & _
\”just be patient! make me a coffee!\” & authors & version
const msgpwordfound1 as string = \”you had a worksheet \” & _
\”structure or windows password set.\” & dblspace & _
\”the password found was: \” & dblspace & \”\” & dblspace & _
\”note it down for potential future use in other workbooks by \” & _
\”the same person who set this password.\” & dblspace & _
\”now to check and clear other passwords.\” & authors & version
const msgpwordfound2 as string = \”you had a worksheet \” & _
\”password set.\” & dblspace & \”the password found was: \” & _
dblspace & \”\” & dblspace & \”note it down for potential \” & _
\”future use in other workbooks by same person who \̶

为什么有的云服务器很便宜呢
动态壁纸音乐怎么设置 动态壁纸有声音吗
edm怎么做
不错的云服务器代理网站平台
【蚌埠网站建设】网站建设哪方面最重要的呢？
云服务器和域名购买
mx记录未生效-域名及账户问题
西部数码云服务器里的建站系统