[英]Excel VBA Data Export
這是我編寫的用於從excel導出數據但看不到任何記錄的代碼。
Sub copyFromRecordset()
Set conn = New ADODB.Connection
Set wipData = New ADODB.Recordset
conn.ConnectionString = conStr
conn.Open
With wipData
.ActiveConnection = conn
.Source = "WipBin"
.LockType = adLockReadOnly
.CursorType = adOpenForwardOnly
.Open
End With
Worksheets.Add
Range("A2").copyFromRecordset wipData
wipData.Close
conn.Close
End Sub
請指教
為什么DoCmd.TransferSpreadsheet
使用DoCmd.TransferSpreadsheet
方法
DoCmd.TransferSpreadsheet acExport, , "TABLE name", "filelocation"
https://msdn.microsoft.com/zh-CN/vba/access-vba/articles/acspreadsheettype-enumeration-access
聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.