简单实用:不用破解密码保护工作簿,四句话将所有隐藏表显示出来

96lingzhi · 发表于 2010-7-2 21:51

先用先了。

李子然 · 发表于 2010-7-2 23:15

看到几个高手都说好，下载下来看了半天，工作薄在哪里加密了？难道是工作表还是VBE被加密了，实在是没看懂！
单纯为了将隐藏的工作表显示出来，这句又显得多余（ActiveWorkbook.Sheets.Copy），直接这样就可以了吧？
Sub test()
For Each sh In Sheets
sh.Visible = True
Next
End Sub

daniel751223 · 发表于 2010-7-2 23:20

我也没看懂是什么啥意思.如果真正要加密,是会连VBA一起加密的.那容得你来增加VBA代码.

subend · 发表于 2010-7-3 01:36

回复 11楼 lhteee 、 13楼李子然、 14楼 daniel751223 的帖子

可能是本人在1楼说明不太清楚，让你们不理解真实情况，现已在1楼重新做了内容补充和更新，谢谢。

随心所欲 · 发表于 2010-7-17 20:32

很简单，很实用

jxyjw · 发表于 2010-9-6 15:04

不明白，人家加密的代码哪里会容你增加代码？上面一些高手说简单实用，我真的不明白，啥意思。

huligege99 · 发表于 2010-9-17 21:35

记号学习了

枫桥夜泊lwb · 发表于 2010-9-17 23:07

谢谢楼主分享收藏了

asdf159357 · 发表于 2010-11-22 16:45

做个记号，收藏下。

bketliu · 发表于 2010-11-22 21:18

这个附件怎么解呀？

		自动登录	找回密码
密码			免费注册

[分享] 简单实用:不用破解密码保护工作簿,四句话将所有隐藏表显示出来

不明白，人家加密的代码哪里会容你增加代码？