VBA 运行时错误‘-2147217900(80040e14):自动化(Automation)错误

问题描述：初次尝试使用VBA去操作Access数据库，执行 INSERT 操作的时候，发生了“运行时错误'-2147217900(80040e14):自动化(Automation)错误”异常。

图 1

Sub 连接()Dim con As ADODB.Connection '声明对象变量Set con = New ADODB.Connection '创建对象变量Dim sql As String'建立数据库连接'con.Open "provider=microsoft.ace.oledb.12.0;data source =" & ThisWorkbook.Path & "\test.accdb"  '连接access数据库'以下写法等效于 con.OpenWith con.Provider = "microsoft.ace.oledb.12.0".ConnectionString = ThisWorkbook.Path & "\test.accdb".OpenEnd WithMsgBox "连接成功"sql = "insert into check(code,year,month,day) values ('1','2022','1','1')"'sql = "insert into m_check(m_code,m_year,m_month,m_day) values (3,2022,1,1)"con.Execute (sql)con.Close   '关闭连接Set con = Nothing '释放变量
End Sub

解决过程：

1.在Access SQL 查询分析器执行以下SQL，结果类似如图2所示是通过的。但是VBA运行仍然不通过
SQL insert into check(code,year,month,day) values ('1','2022','1','1')
2.考虑是不是因为使用了 code 、year 、month 、day 等字段所引起的，所以将这几个字段更改成了 m_code、m_year、m_month、m_day。问题还是存在。

3.检查字段名前后有无空格

4.参考许多案例，发现值是为数字的时候，不需要加 ''(单引号)。【字段类型设置是短文本类型】，问题解决。如图3成功
sql = "insert into m_check(m_code,m_year,m_month,m_day) values (3,2022,1,1)"

图 2

图 3

总结：

1. 数据库表字段名称不能使用关键字

2.表字段不能使用空格和其他特殊字符

3.排除SQL语法错误

4.值为数字时，不应使用单引号，即使表字段类型是文本类型。

参考：

http://cn.voidcc.com/question/p-fowngkyr-qb.html

VBA 运行时错误‘-2147217900(80040e14):自动化(Automation)错误相关推荐

vba mysql 自动化错误_vba小程序报自动化(Automation)错误如何处理?
我们需要得到银行的实时汇率并导入自己的数据库表中.采用excel,写一小段vba代码:PrivateSubWorksheet_Change(ByValTargetAsRange)Sheets(&quo ...
vba mysql 自动化错误_在Excel中运行VBA脚本时出现自动化错误
在Excel 2007中运行VBA代码时出现自动化错误.我尝试连接到远程SQL Server数据库并将数据从Excel加载到SQL Server.在Excel中运行VBA脚本时出现自动化错误我得到的 ...
c语言错误1004,Excel VBA运行时错误1004仅以名称以'c'开头
没错.如果我将以下代码中的"Chart_Series_W_Gain_AAPL"中的'C'更改为代码工作的任何其他字母.否则它会在Series.Formula分配中引发错误1004. ...
计算机错误代码3420,如何解决vba运行时错误3420
当用户输入新记录时,我有以下检测重复产品名称.如何解决vba运行时错误3420 Private Sub ProdName_BeforeUpdate(Cancel As Integer) Dim Pro ...
解决VBA运行时错误13 类型不匹配问题
解决VBA运行时错误13 类型不匹配问题先说解决方法:找到出错的语句以后给里面的参数改类型,使其互相兼容. 比如:给单元格Cells()外面套个马甲 Val() 比如:给数字外面套个马甲Int() ...
WPS中VBA控制word时出现调用错误
WPS中VBA控制word时出现调用错误背景, 在WPS的环境下, 我的WORD自动填写软件出错, 主要怀疑: 如果没有WORD文件被打开的状态下如果最后一个文件被关掉, 与EXCEL不同, 这时 ...
关于用友T3 Automation错误（-2147024770）
前段时间有客户反应在打开用友T3的时候选择了帐套再点击登录就出现如下的错误提示: 首先,能选择帐套表明数据库服务是正常的,如果服务器端与客户端不在同一台机器,那表明网络是连通的.接下来该思考的就是软件 ...
Automation错误定义的应用程序或对象错误-Scripting.FileSystemObject
金蝶在使用前,要先进行远程组件配置,调用中间层,如下图但是出现了问题, 显示金蝶提示:Automation错误定义的应用程序或对象错误-"Scripting.FileSystem ...
Rose2003运行出现 -2147417848 (80010108)':Automation 错误
上篇博客在结尾的时候,我提到了Ration Rose2003运行出现"-2147417848 (80010108)':Automation错误"的问题.今天这篇博客就来介绍一下如何 ...

VBA 运行时错误‘-2147217900(80040e14):自动化(Automation)错误

VBA 运行时错误‘-2147217900(80040e14):自动化(Automation)错误相关推荐

最新文章

热门文章