excel无法复制粘贴已保护的工作表怎么办

1、excel无法复制粘贴已保护的工作表怎么办Excel表格密码保护的解除方法表格受密码保护时，我们修改数据 Excel弹出“您试图更改的单元格或图表受保 护，因而是只读的。若要修改受保护单元格或图表，请先使用撤消工作表保护' 命令(在审阅选项卡的更改'组中)来取消保护。可能会提示您输入密码。 这时候我们可以用VBA宏代码破解法来破解表格保护密码：第一步：打开该文件(ofice2007)打开开发工具一点击“录制宏”， 出现“录制新宏”窗口,在“宏名”定义一个名称为：PasswordBreaker,点击“确定”退出第二步：再点击“宏” 一 “查看宏”，选择“宏名”下的“ Passwo

2、rdBreaker并 点击“编辑”，打开 “Microsoft Visual BasiC 编辑器,用如下内容替换右侧窗口中的所有代码：Sub PasswordBreaker()Dim i As Integer, j As Integer, k As IntegerDim l As Integer, m As Integer, n As IntegerDim i1 As Integer, i2 As Integer, i3 As IntegerDim i4 As Integer, i5 As Integer, i6 As Integer On Error Resume NextFor i = 6

3、5 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) & C

4、hr(i1) & Chr(i2) & Chr(i3) & _ Chr(i4) & Chr(i5) & Chr(i6) & Chr(n) If ActiveSheet.ProtectContents = False ThenMsgBox "One usable password is " & Chr(i) & Chr(j) & _ Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _ Chr(i3) & Chr(i

5、4) & 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: N

6、ext: Next: Next: Next Next: Next: Next: Next: Next: Next End Sub:伟与ym nA：. 10 丽卬 金厅的 mcd 黔耳n工国 .口由； f n翼s u-.Eun. a. 7 pjf；包I K.a KI* 加型学学下；，看再用1，丫 y” Fer1.。的 1。6666 Per il = 6b To 66 .2 埠 h CC Pj i3 二昨九 3. 7v« H 3 h 呢 t5 = 65 To 56 For i6 = 55 To 66： Tor t» = 52 To J266， i fi9 IBfe*r,j 1，

7、lc，bv.KQq!M*erD1, L A. lati 4s kNo&r,aMInteorlb, J A- Ib"u，i2 M iMec*1'.<3,，Int<c*rD” ；4 触 LiX0yi5 M48Xs IrReggyOft Error J*r(i :3 I。就 For j = 66 C 8C Eu k = 85 , BMtiMb&et l如。SU Ck (i) 4 Ckr (j) A Ctor 00 AOirG) Qr tn A ChrGl) A ChrG?) * Chr(i3j A 二 ciu (.4) d CU G5) 1 d ij i

8、 ciu UJIf *ri"Sb，Z Pr»tectCor«tr15 = 7<li* TbnIk正m. *0xis 口:41.i】 A Chx G)，Chj G) A _Chr 00 Qi CD a Cbr G) 匚匕 GI) - Dir G2) , 一 dHBhCxG。&一 一 - - 一一一 Activol ,卜卜 <-k 5hee 京32(。工：Jori-Gl ckro) cl：a) “a Cr(：3) 4 CrG。1 Zsit Sub Ui ：f H«xtV«3(Jhxt bnt. I ZU %bChJ:r CVma

9、IU, i M Tatecerz j y"16丫, > As Int”wp lit 1 AS I&Ugar. c *Ji As Ixdg;的lit，L心 瓜pu. 12 Ai laUg% i0 u IctlfaM Di« i4 A、i5 A*»6 A、Int«r«rOn Error R-5»ir* BertFor i 二 65 Io ee F«r j g Ta « 3 k = 65 To 6e for 1 = 65 1。ee Kr r. = 6(> 1;比 F« il = 65 Io

10、tt Par ,2 1 3 T. IX P，r ,2 > S 1, f£ Pur i< > 3 T» C& For iS = 6S To 3 For 16 = 65 To 3 Far x» = 3? Tc 12S AetiveSMef Ifyjraee，Oa*6 t Ckr(j) < Cbo*l» * _ 二M Qi iCsrlri aCbx(il) i Cbr I'i2i & 二W(i3)& Cbx U4,I & Jbx (i5j & Chr U6J 1 Lia UjIf ArUv

11、aSk««t F"«"QUfQ.mK=，*！、 Ther.射二磔 On2 1mbic rt7s*-rd :? ' A Chr G)表 ChrG) 2 _ Chr 0?)，Chr Q * Cbr (r) * Chr GI) * Ckr 棺2) 一 Chx (i3) & :必41A UM5) X Chx(i6) i CtjrU)JOi Sbevti (I) S-:t-U.lG P=U1C ,zd1g门/.一Microsoft Visual Bask.eiitr料中包含冷匕、ru trsFfe- -v邓伟.=中司箭可含个,、信司，wrd心位元不常过e孕：百羔”亍r第三步：再点