我可以只从记录集中复制一个 row/field 到 excel 列吗

Question

有没有一种方法可以将值从记录集的单个列复制到 Excel 中的列，而不必使用循环？我尝试了以下方法来复制单个列：

    Sheet4.Range("Complete").CopyFromRecordset rsEDW.Fields(3)

但这没有用。

Answer 1

编辑：看起来您可以只复制一列而无需使用最大列引用的循环。

https://msdn.microsoft.com/en-us/library/office/aa223845%28v=office.11%29.aspx

我不认为没有循环就可以做到这一点。您将不得不遍历记录集并使每一列成为记录集中的一个字段。

With rs
    Do Until .EOF
        ActiveSheet.Range("A" & lastRow).CopyFromRecordset rsEDW.Fields(3)
        ActiveSheet.Range("B" & lastRow).CopyFromRecordset rsEDW.Fields(4)
.MoveNext
lastRow = lastRow + 1
Loop
End With

我可以只从记录集中复制一个 row/field 到 excel 列吗

Can I copy only one row/field from a recordset to an excel column

sql

excel

vba

recordset