Access 2007:意外错误(40230)

use*_*468 6 ms-access vba ms-access-2007 access-vba

尝试访问Access 2007中的表单的VBA代码时,我收到一个意外错误(40230).

我试过反编译,这就是我发现该项目是腐败的.我反编译时收到以下消息:

"The Visual Basic for Applications project in the database is corrupt"
Run Code Online (Sandbox Code Playgroud)

我尝试通过以下方式将VBA代码保存到文本文件:

Application.SaveAsText acForm, "App_Form", "C:\Users\jck112\Documents\Module1.txt"
Run Code Online (Sandbox Code Playgroud)

但我得到以下错误:

Run-time error '3021'
No current record.
Run Code Online (Sandbox Code Playgroud)

我也尝试将表单导入新数据库,但它不允许我.它允许我从表单所在的同一个DB导入表,查询,但不会让我选择表单,它被禁用.

另外,我有.accdb和.accde文件.

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

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

任何帮助都非常感谢

小智 15

ALT+ F11,选择Tools- > VBAProject Properties,导航到Protection tab,添加新密码,然后再次确认(如果您想要新密码),

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