我正在将 ADODB.Recordset
数据复制到 excel 文件,但它将记录集数据复制到没有列标题的 excel。我正在使用 MS Access 2013,CompyFromRecordset
命令。
我的问题是,有什么办法可以复制RecordSet的数据头吗?
For i = 0 To iFieldCount - 1
objSheet.Range("A" & i + 1).CopyFromRecordset rst
objBook.Save
Next i
最佳答案
“标题”不是记录,CopyFromRecordset
命令不包含标题。
您必须通过遍历返回的记录集的字段名,自己将标题放在工作表中,例如:
For i = 0 To rs.Fields.Count - 1
Cells(1, i + 1).Value = rs.Fields(i).Name
Next
Cells(2, 1).CopyFromRecordset rs
关于ms-access - ADODB 记录集列标题,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/36568793/