Excel VBA 确定给定文件夹中工作簿的宏是否加密 180

很久以前，我写了一个删除我自己的**，excel2003版本的过程。

public sub remove_module()on error resume next

如果 = 1，则 '1 表示受密码保护。

2578).execute

password" & "", truemsgbox "无法创建对象！ ", ,"warning!"“假象，呵呵。

end if

falsewithvbcomponents("模块的名称")end with

3).execute, true

end sub

没有办法直接用 vba 打开它，= vbext pp locked 这句话会错，你应该检查 excel 中的宏：安全性：可靠的开发人员：信任访问“Visual Basic 项目”。

private sub workbook_open()dim pw$

pw = "1111"

if = vbext_pp_locked then"工具（t）。").controls("VBAMilject 属性 （&E）。").execute

pw & ""

pw & ""

doevents

end if

end sub

我记得 = 0 表示不加密，1 表示加密。

if = 0 then

工具（t）。").controls("VBAMilject 属性 （&E）。").execute

pw & ""

您的宏需要激活工作表才能执行，如果您隐藏它，它将出错。

然后，您可以取消隐藏它，然后再次隐藏它。

在那里找到文件。

VBAAwindow， 工具， VBAProject， 属性， 保护， 勾选密码！

如果你想看到它，你总是可以看到它，除非它被封装为 dll

如果 Excel 宏设置为“高级”，则禁用该宏，然后重新打开 Excel。

向您介绍一个**，Excel Home，有关于VBA的问题

有了winhex、ultraedit-32等16个碱基的挖渣工具，再厉害的人类训练核心，只要debug命令就可以做到。 使用上述软件打开excel文件，找到并找到以下位置：

将 CMG=、DPB= 和 GC= 替换为"="梁枣改为"."能。

互联网上有很多类似的问题。

你可以自己写一个vba**来破解它。 但是，公开很不方便，但你可以打招呼。

紫艺空间站 - Excel培训专家。

它不会那么弱，低估Microsoft太过分了。

呵呵，不知道你们公司的电脑是不是上网了，U盘用不了（是锁箱还是锁系统？ 有什么限制？ 例如，您无法登录......作为管理员如果机箱被锁定，您无法以管理员身份登录，则只能拭目以待。

Excel提示下标越界是VBA程序运行时的错误提示，原因有以下几种： 1.它指的是不存在的数组元素：下标大于或小于可能的下标范围，或者应用程序这边的数组没有指定范围。

2. 声明数组时未指定元素数：引用不存在的集合成员。 3.以草图的形式使用下标，结果是指定了错误的元素。

4.参考或操作的工作簿或工作表不存在。

保存的工作表文件的名称和路径是否一致？