4

我提供了正确的密码

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("H:\M\X\C.xls", 0, , , "password")

'这些行中的任何一行都会导致提到的错误

Set vbcomp = objWorkbook.VBProject.VBComponents(modname)
objWorkbook.VBProject.VBComponents.Remove vbcomp
objWorkbook.VBProject.VBComponents.Import modpath & modtest

任何想法可能是什么问题？Tools-Macro-Security 设置为允许VB项目访问

4

3 回答 3

5

VBA 项目本身受密码保护，该密码与工作表密码不同。打开 VBA IDE - 选择 Tools-VBA Project Properties 并查看 Protection 选项卡。

不确定如何或是否可以使用代码删除 VBA 项目密码。

于 2009-04-14T16:05:08.063 回答
0

这听起来可能很极端，但是我设法通过下载 Windows Installer Clean up Utility（在 Google 中查找 msicuu2.exe）并删除了 office 2003 来解决这个问题。然后我重新安装了 office 2003，我的问题就消失了。希望它也能解决你的问题。亚历克斯

于 2009-11-18T11:50:03.923 回答
0

我今天发现，如果您在将模块保存到项目之前尝试使用访问项目模型，您将得到这个答案！

我粘贴了一个我之前在另一个数据库中多次使用过的函数，但是当我尝试运行它时遇到了这个错误，直到我将新创建的模块保存到项目中。非常愚蠢，但这可能是其他人的疏忽，所以我将其包括在这里。

于 2019-08-23T20:59:53.590 回答