今天來說明如何在Excel 中搭配 Access資料庫系統來處理經常使用的檔案,以達到管理資料處理半自動的目標
要和Access搭配在Excel VBA中需使用ADODB來連結Access資料庫中的資料到Excel中使用...
第一步就是設定ADODB了
在Excel VBA編輯器(VBE)中
設定如上圖片中的項目
在前期綁定中需要宣告變數給ADODB
其語法為:
Dim myCon As New ADODB.Connection 用來連結資料庫
Dim myRs As New ADODB.Recordset 用來連結資料庫中的資料表
這2個必須聲明的變數Connection 和Recordset
前期綁定變數的好處是方便寫程式,但缺點是,只能在有綁定的電腦中使用,而後期綁定就可以在其他有Excel電腦中執行了
從期綁定的方式為:
Set myCon = CreateObject("ADODB.Connection")
Set myRs = CreateObject("ADODB.Recordset")
其中宣告Connection給變數myCon,Recordset給變數myRs,變數名稱可以自行編制
上面所述說的都只是宣告變數而已,我們還要打開它才能真的提取資料來使用
下面貼上整個程式常用到的模塊,以供參考
Dim myCon As ADODB.Connection '連結資料庫
Dim myRS As ADODB.Recordset '連結資料表
Set myCon = New ADODB.Connection
myCon.Open "provider=Microsoft.ACE.OLEDB.12.0;" & _
"Data Source=" & ThisWorkbook.Path & "\資料庫.accdb;" '因資料庫的不同需修改資料庫檔名
'...
'程式內容
'...
myRS.Close '關閉 myRS
myCon.Close '關閉 myCon
Set myRS = Nothing '設定 myRS 為 Nothing
Set myCon = Nothing '設定 myCon 為 Nothing
文章標籤
全站熱搜
留言列表