《excel表格内容只读不能修改及破解》由会员分享，可在线阅读，更多相关《excel表格内容只读不能修改及破解（17页珍藏版）》请在金锄头文库上搜索。
1、只读不能修改方法：在EXCEL里，选择工具选项安全性分别设置打开权限密码和修改权限密码，2个密码要不一样，然后确定，会弹出对话框让你重新输入密码，第一个框输入你设置打开权限密码，第二个框输入你修改权限密码，然后保存文件。然后你把打开权限密码给别人就0K了，别人打开就是只读，不能修改。要修改需要你修改权限密码。？补充一下：如果不想只读打开需要密码，可以不设置打开权限密码，只设置修改权限密码。破解Excel保护方法Excel对数据有很强的保护功能，可以对整个或部分数据隐藏、禁止复制和修改等，但有时候，由于忘记了密码，或者记不起以前自己到底做了哪些改动，这种保护反而会为难自己。针对这种情况，我总结了
2、几种解除保护的方法，供大家参考，并希望能够以此抛砖引玉。一、解除单元格的保护1.取消隐藏的行或列？?被隐藏的行或列有一个明显的标志，那就是在行标题栏或列标题栏上有一条粗的黑线。取消隐藏的行或列的方法有两种，一种是直接拖动隐藏处的行或列标题使之变宽，也可以选中包含隐藏区域的行或列，通过“格式”菜单中的行列项目输入非0数值调整行高或列宽，使数据有足够的空间显示出来；另一种方法是选中包含隐藏内容的行或列区域，再通过“格式”菜单行列选项中的“取消隐藏”命令来恢复全部行列区域。2取消隐藏单元格或区域中的数据?为了不让他人直接看到单元格的内容，一种简单的方法就是把数据颜色设置成与背景色相同，这时我们只要拖
3、选整个工作表即可让数据原形毕露；如果用图片、矩形框之类的非字符内容将重要数据遮盖，需要先用拖选方式找出工作表中的图片位置，再将其移开，激活被遮住的单元格，一般在公式编辑栏中就会显示其内容。?若在单元格格式中使用了三个分号或空格之类的自定义格式，一般只要选中此单元格,在公式编辑栏中即可显示其内容,要想取消这种隐藏，可重新设置此单元格格式，在数字”选项卡中选择“常规”即可。?如果选中怀疑有数据的单元格后并没有在公式编辑栏中显示数据，不一定它就真的没有数据，我们只要看一下单元格的格式能否设置，若不能的话说明工作表被保护，如果不用密码可以取消工作表保护的话，再在单元格格式设置中先查看数据格式是否为自定
4、义，然后查看“保护”选项卡，看看是否已勾选了“隐藏”项，将这些都取消就可以知道单元格是否真的没有内容。当然，如果在撤消工作表保护时需要密码的话，我们将无可奈何，除非用户设置的密码很简单，那我就告诉你一个秘密，当密码的形式是23或时，我们可以分别用333或来破解,星号表示任意字符，到底是什么只有靠猜了，这种方法对工作表和工作簿保护的密码也适应。3取消单元格数据的只读属性?有时单元格中的数据虽然可见，但是我们既不能修改，也不能在当前工作表中复制，对于这种保护措施，取消的方法跟上面的第2点基本相同，只要取消单元格格式设置对话框中保护选项卡中的锁定一项即可。当然还需要通过密码取消工作表的保护才行。如果
5、我们无法通过密码取消怎么办？你可以将其复制粘贴到其他工作表中，再在新的工作表中进行修改。二、解除工作表的保护?查看是否有被隐藏的工作表，若菜单中有格式工作表取消隐藏项，则可通过此项取消隐藏的工作表。?如果在菜单中也没有有效的取消隐藏项，仍然可能有被隐藏的工作表，这时我们可以任选一工作表右击，在弹出菜单中选择查看代码，然后在左窗格中的对象列表中选择被隐藏的工作表，将其属性值取-退出即可，如图所示。?如果工作表被密码保护，则可复制当前表全部内容到另一张未保护的工作表中编辑。?官方下载三、VBA宏代码破解法：?第一步：打开该文件，先解除默认的宏禁用状态，方法是点击工具栏下的选项状态按钮，打开icro
6、sotOice安全选项窗口，选择其中的启用此内容，确定退出(图2)；再切换到视图选项卡，点击宏录制宏，出现录制新宏窗口，在宏名定义一个名称为：PasswordBreaker(图3)，点击确定退出；第二步：再点击宏查看宏，选择宏名下的PasswordBreaker并点击编辑，打开icrosotVisualBasic编辑器，用如下内容替换右侧窗口中的所有代码：SubPasswordBreaker()DimiAslnteger,jAslnteger,kAslntegerDimlAslnteger,mAslnteger,nAslntegerDimi1Aslnteger,i2Aslnteger,i3As
7、lntegerDimi4Aslnteger,i5Aslnteger,i6AslntegerOnErrorResumeNextFori=65To66:Forj=65To66:Fork=65To66Forl=65To66:Form=65To66:Fori1=65To66Fori2=65To66:Fori3=65To66:Fori4=65To66Fori5=65To66:Fori6=65To66:Forn=32To126ActiveSheet.UnprotectChr(i)&Chr(j)&Chr(k)&_Chr(l)&Chr(m)&Chr(i1)&Chr(i2)&Chr(i3)&_Chr(i4)&C
8、hr(i5)&Chr(i6)&Chr(n)lfActiveSheet.ProtectContents=FalseThenMsgBoxOneusablepasswordis&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).SelectRange(a1).FormulaR1C1=Chr(i)&Chr(j)&_Chr(k)&Chr(l)&Chr(m)&Chr(i1)&Chr(i2)&_Chr(i3)&Chr(i4)&C
9、hr(i5)&Chr(i6)&Chr(n)ExitSubEndIfNext:Next:Next:Next:Next:NextNext:Next:Next:Next:Next:NextEndSub第三步：再点击宏查看宏,选择宏名下的PasswordBreaker并点击执行，密码就现形了(图4)。第四步：切换审阅选项卡，点击撤消工作表保护，然后输入密码即可解除锁定。旗舰版系统下载?另一个能解除Excel工作表保护的VBA脚本OptionExplicit?PublicSubAllInternalPasswords()?Breaksworksheetandworkbookstructurepasswo
10、rds.BobMcCormick?probablyoriginatorofbasecodealgorithmmodifiedforcoverage?ofworkbookstructure/WINdowspasswordsandformultiplepasswords?NormanHarkerandJEMcGimpsey27-Dec-2002(Version1.1)?Modified2003-Apr-04byJEM:Allmsgstoconstants,and?eliminateoneExitSub(Version1.1.1)?RevealshashedpasswordsNOToriginalp
11、asswords?ConstDBLSPACEAsString=vbNewLine&vbNewLine?ConstAUTHORSAsString=DBLSPACE&vbNewLine&_?AdaptedfromBobMcCormickbasecodeby&_?NormanHarkerandJEMcGimpsey?ConstHEADERAsString=AlllnternalPasswordsUserMessage?ConstVERSIONAsString=DBLSPACE&Version1.1.12003-Apr-04?ConstREPBACKAsString=DBLSPACE&Pleasere
12、portfailure&?tothenewsgroup.?ConstALLCLEARAsString=DBLSPACE&Theworkbookshould&_?nowbefreeofallpasswordprotection,somakesureyou:&_?DBLSPACE&SAVEITNOW!&DBLSPACE&andalso&_?DBLSPACE&BACKUP!,BACKUP!,BACKUP!&_?DBLSPACE&Also,rememberthatthepasswordwas&_?putthereforareason.Dontstuffupcrucialformulas&_?ordat
13、a.&DBLSPACE&Accessanduseofsomedata&_?maybeanoffense.Ifindoubt,dont.?ConstMSGNOPWORDS1AsString=Therewerenopasswordson&_?sheets,orworkbookstructureorwindows.&AUTHORS&VERSION?ConstMSGNOPWORDS2AsString=Therewasnoprotectionto&_?workbookstructureorwindows.&DBLSPACE&_?Proceedingtounprotectsheets.&AUTHORS&V
14、ERSION?ConstMSGTAKETIMEAsString=AfterpressingOKbuttonthis&_?willtakesometime.&DBLSPACE&Amountoftime&_?dependsonhowmanydifferentpasswords,the&_?passwords,andyourcomputersspecification.&DBLSPACE&_?Justbepatient!Makemeacoffee!&AUTHORS&VERSION?ConstMSGPWORDFOUND1AsString=YouhadaWorksheet&_?StructureorWi
15、ndowsPasswordset.&DBLSPACE&_?Thepasswordfoundwas:&DBLSPACE&$&DBLSPACE&?Noteitdownforpotentialfutureuseinotherworkbooksby&_?thesamepersonwhosetthispassword.&DBLSPACE&_?Nowtocheckandclearotherpasswords.&AUTHORS&VERSION?ConstMSGPWORDFOUND2AsString=YouhadaWorksheet&_?passwordset.&DBLSPACE&Thepasswordfoundwas:&_?DBLSPACE&$&DBLSPACE&Noteitdownforpotential&?futureuseinotherworkbooksbysamepersonwho&_?setthispassword.&DBLSPACE&Nowtocheckandclear
