|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
EXCEL2010操作方法
在要解密的工作簿中创建个宏,复制以下代码到弹出框
Sub Macro1()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
ActiveSheet.Unprotect
End Sub
关闭窗口,再回到开发工具下的宏,再点执行即可
[ 本帖最后由 lbstart 于 2010-6-18 11:07 编辑 ] |
|