轻松移除Excel工作表保护密码

　　Microsoft Excel是微软公司的办公软件Microsoft office的组件之一，是微软办公套装软件的一个重要的组成部分 。它可以进行各种数据的处理、统计分析和辅助决策操作，广泛地应用于管理、统计财经、金融等众多领域。
　　 很多朋友无论是办公处理数据，还是处理私人数据，最常用的就是Excel。
　　 使用Excel过程中，出于对数据的保护，我们很多时候会对工作表进行加密处理。但是带来安全的同时也带了另一个麻烦事，那就是密码遗忘，无法再进行修改编辑。想要通过office excel找回密码，却发现没有找回密码的功能。
　　 这里为你提供一个移除Excel工作表保护密码的方法。我在Excel2003/2010上测试，运行通过。
　　步骤如下：
　　1.打开一个有工作表锁定密码的Excel文件。
　　2.点击Alt＋F11，打开宏编辑器，执行：插入→模块，将下面代码复制进去：
sub pjmm()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _
Scenarios:=True, AllowFiltering:=True, AllowUsingPivotTables:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, _
Scenarios:=False, AllowFiltering:=True, AllowUsingPivotTables:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, _
Scenarios:=False, AllowFiltering:=True, AllowUsingPivotTables:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, _
Scenarios:=True, AllowFiltering:=True, AllowUsingPivotTables:=True
ActiveSheet.Unprotect
end sub
　　3.将光标移到上面代码中的任意位置，执行：运行→运行子过程。
　　OK，现在你去看看，工作表的保护密码是不是溜走了?
　　还有更简单的代码呢，只两句（“Sheet1”是 有密码的工作表名）：
sub pjmm()
Sheet1.Protect AllowFiltering:=True
Sheet1.Unprotect
end sub
　　试试看，会让你乐不可支的！