使用ADO操縱外部數(shù)據(jù)

作用：將指定路徑的數(shù)據(jù)抓過來，

ADO如何連接外部數(shù)據(jù)源

開始前需要在VBA界面 -- 工具 -- 引用
勾選Microsoft ActiveX Data Object x.x Library

模版
Sub test()
Dim conn As New ADODB.Connection
Dim sql As String
'注意這個(gè)鏈接文件的路徑?。?！需要把edata文件放入d:\data文件夾?。?
Range("a2:z1000").ClearContents

'連接某個(gè)路徑下的表，HDR的意思是是否有表頭'
'YES是抓取過來時(shí)不要表頭'
conn.Open "Provider = Microsoft.ACE.OLEDB.12.0;Data Source=D:\data\Edata.xlsx;extended properties=""excel 12.0;HDR=YES"""

sql = "select a.姓名,年齡,性別,月薪 from (select * from [data$] union all select * from [data2$])a left join [data3$] on a.姓名=[data3$].姓名"

'sql中執(zhí)行delete語句時(shí)就直接 conn.Execute執(zhí)行即可'
Range("a2").CopyFromRecordset conn.Execute(sql)

conn.Close
End Sub
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
【社區(qū)內(nèi)容提示】社區(qū)部分內(nèi)容疑似由AI輔助生成，瀏覽時(shí)請(qǐng)結(jié)合常識(shí)與多方信息審慎甄別。
平臺(tái)聲明：文章內(nèi)容（如有圖片或視頻亦包括在內(nèi)）由作者上傳并發(fā)布，文章內(nèi)容僅代表作者本人觀點(diǎn)，簡書系信息發(fā)布平臺(tái)，僅提供信息存儲(chǔ)服務(wù)。

相關(guān)閱讀更多精彩內(nèi)容

友情鏈接更多精彩內(nèi)容