我可以只复制一个logging集中的行/字段到excel列吗？

有没有办法将logging集的单个列中的值复制到Excel中的列而不必使用循环？ 我尝试了以下操作来复制单个列：

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

但是这没有用。

Answer 1

编辑：它看起来虽然你可以复制只有一列没有最大列参考循环。

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

我不认为有没有循环做这件事。 您将不得不遍历logging集，并使每列成为logging集中的一个字段。

 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