將VBA記錄集粘貼到excel中？

Question

如果我在VBA中返回了一個SQL記錄集，是否有一種簡單的方法就可以將值粘貼到電子表格中而無需循環執行等？

Answer 1

如果使用的是“ Oracle InProc服務器”和OraDynaset，則將使用以下代碼段。

Dim QueryResults As OraDynaset
Set QueryResults = Label_DB.CreateDynaset(SQL_String, 0&)
QueryResults.CopyToClipboard
Selection.Paste

CopyToClipboard的默認行為是將TAB（ASCII 9）作為列分隔符，而將ENTER（ASCII 13）作為行分隔符。