excel2007取消加密保护的教程.docx

excel2007取消加密保护的教程1、打开Excel表格中的Excel选项，选择自定义，得到如下画面：excel2007撤销保护密码的方法图12、然后在左边侧框栏中选择“查看宏”之后双击或者选择添加按钮，则可以看到右边栏中有了查看宏按钮，之后点击右下角的确定。3、大家可以在下面这个窗口处看到箭头所指的按钮：点击按钮，之后弹出窗口：excel2007撤销保护密码的方法图2excel2007撤销保护密码的方法图34、在宏名处填写一个名字(可随意)，然后点击创建，弹出以下窗口：excel2007撤销保护密码的方法图45、将窗口内的内容全选后删除，然后将下面分割线以内的内容开始复制粘贴在上面的窗口内：从横线下开始复制------------------------------------------------------------------------------------------Option?ExplicitPublic?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?passwordsConst?DBLSPACE?As?String?=?vbNewLine?&?vbNewLineConst?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?&?VERSIONConst?MSGNOPWORDS2?As?String?=?"There?was?no?protection?to?"?&?_"workbook?structure?or?windows."?&?DBLSPACE?&?_"Proceeding?to?unprotect?sheets."?&?AUTHO