WPS 加载项开发 > 表格 API 参考 > Range > 方法 > Range.CopyFromRecordset 方法
将 ADO 或 DAO Recordset 对象中的内容复制到工作表,从指定区域的左上角开始。如果 Recordset 对象包含具有 OLE 对象的字段,则该方法无效。

语法

表达式.CopyFromRecordset(Data, MaxRows, MaxColumns)

表达式   一个代表 Range 对象的变量。

参数

名称必选/可选数据类型说明
Data必选Variant复制到区域的 Recordset 对象。
MaxRows可选Variant复制到工作表上的最大记录数。如果省略该参数,将复制 Recordset 对象中的所有记录。
MaxColumns可选Variant复制到工作表上的最大字段数。如果省略该参数,将复制 Recordset 对象中的所有字段。

返回值
Long

说明

复制从 Recordset 对象的当前行开始。复制完成后,Recordset 对象的 EOF 属性为 True

示例

本示例将 DAO Recordset 对象中的字段名称复制到工作表的第一行中,并将这些名称的格式设为加粗。然后,本示例将记录集复制到工作表中,复制的起始位置在 A2 单元格。

示例代码
For iCols = 0 to rs.Fields.Count - 1
    ws.Cells(1, iCols + 1).Value = rs.Fields(iCols).Name
Next
ws.Range(ws.Cells(1, 1),  _
    ws.Cells(1, rs.Fields.Count)).Font.Bold = True
ws.Range("A2").CopyFromRecordset rs

Copy contents of a dao recordset object onto a worksheet? CopyFromRecordset method


请参阅