Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/ms-access/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Ms access Access 2007:意外错误(40230)_Ms Access_Ms Access 2007_Vba - Fatal编程技术网

Ms access Access 2007:意外错误(40230)

Ms access Access 2007:意外错误(40230),ms-access,ms-access-2007,vba,Ms Access,Ms Access 2007,Vba,尝试访问access 2007中表单的VBA代码时出现意外错误(40230) 我尝试了反编译,这就是我发现项目已损坏的原因。我在反编译时收到以下消息: "The Visual Basic for Applications project in the database is corrupt" 我尝试通过以下方式将VBA代码保存到文本文件: Application.SaveAsText acForm, "App_Form", "C:\Users\jck112\Documents\Module1.

尝试访问access 2007中表单的VBA代码时出现意外错误(40230)

我尝试了反编译,这就是我发现项目已损坏的原因。我在反编译时收到以下消息:

"The Visual Basic for Applications project in the database is corrupt"
我尝试通过以下方式将VBA代码保存到文本文件:

Application.SaveAsText acForm, "App_Form", "C:\Users\jck112\Documents\Module1.txt"
但我得到以下错误:

Run-time error '3021'
No current record.
我还尝试将表单导入一个新的数据库,但它不允许我这样做。它允许我从表单所在的同一数据库导入表和查询,但不允许我选择表单,它被禁用

此外,我还有.accdb和.accde文件

注意:表单在使用时功能非常好。按钮点击按预期进行,因此这些按钮背后的代码可以工作。但我需要对代码进行一些增强。

有什么方法可以检索我的VBA代码吗?或者修复我的数据库

非常感谢您的帮助

按ALT+F11,选择
工具
->
VBA项目属性
,导航到
保护选项卡,
添加新密码,然后再次确认(如果需要新密码)

否则,只需放入空白文本框,从锁定项目中删除复选框以供查看,然后保存并关闭excel并重新打开它!
给我一杯啤酒

您还可以尝试另一件事(但不确定它是否对您的情况有帮助…)-将表单导入新的空数据库,并尝试观察新数据库中的代码DB@sarh我试过了,我可以导入表格、查询,但是当我尝试导入表单时,它被禁用了。我只是在MicrosoftWord2010(c)下有相同的错误代码,同样的答案帮助了我。谢谢"越南人"!!