為什麼這篇Excel VBA 連結資料庫鄉民發文收入到精華區：因為在Excel VBA 連結資料庫這個討論話題中，有許多相關的文章在討論，這篇最有參考價值！作者ProTrader (沒有暱稱)看板Office標題[問題] Excel VBA 寫入或讀取 ...
軟體:Excel & Access
版本:2007
簡單的說就是在Excel VBA 用ADO操作Access
不管是把資料從Excel寫入 或是資料從Access獨出
資料的順序都會跑掉 我寫入或獨出的資料都是排好順序的日期資料
現在就是每次讀寫完我都要再排序一次
有人知道這是甚麼問題嗎??
讀出
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 & "\MyTestDB.accdb;"
Set myRS = New ADODB.Recordset
With myRS
.ActiveConnection = myCon
.Source = "我的資料庫"
.Open
End With
ThisWorkbook.Worksheets("Sheet1").Cells(1, 1).CopyFromRecordset myRS
myRS.Close
myCon.Close
Set myRS = Nothing
Set myCon = Nothing
End Sub
寫入時也相同 用AddNew 但有先MoveLast
===========================================================================
與Access連線後 每次只寫入一筆資料 然後就切斷與Access的連結
資料排序就會正確
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 60.245.65.140
※ 編輯: ProTrader 來自: 1.160.34.234 (11/11 12:54)