怎么在excel vba中引用access中的数据

怎么在excel vba中引用access中的数据,第1张

可以使用宏来实现,给你一个简单的例子。

Sub adoTest()

Dim adoRt As Object

Dim strSQL As String

'// 创建ADO记录集对象

Set adoRt = CreateObject("ADODBRecordSet")

'// 设置SQL 语句

strSQL = "SELECT FROM uTemp WHERE False"

With adoRt

'// 设置需要连接数据

ActiveConnection = "Provider=MicrosoftJetOLEDB40;Data Source=D:\栽培者\程序\打印类\测试\printTestmdb"

CursorLocation = 3

CursorType = 1

LockType = 3

'// 设置SQL语句

Source = strSQL

'// 准备打开记录集

Open

'// 新增记录

AddNew

'// 赋值

Fields("Name")Value = Range("A1")Value

Fields("Sex")Value = Range("B1")Value

Fields("Age")Value = Range("C1")Value

'// 更新

Update

'// 判断并关闭记录

If State = 1 Then

Close

End If

End With

'// 从内存中释放

Set adoRt = Nothing

End Sub

以上就是关于怎么在excel vba中引用access中的数据全部的内容,包括:怎么在excel vba中引用access中的数据、如何在EXCEL中,用VBA实现数据自动更新到ACCESS中、excel中如何直接调用access数据等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/sjk/9391440.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-04-27
下一篇2023-04-27

发表评论

登录后才能评论

评论列表(0条)

    保存