Recordset不会返回所有的数据VBA

我有一些问题试图从logging集中提取一些数据，vba代码是这样简单的：

cnt.Open stDB Query = "SELECT TriggerDescription," Query = Query & " FROM Research_Control" Query = Query & " WHERE (((Research_Control.Status) = 1))" Query = Query & " ORDER BY Research_Control.Enterprise;" rs.Open Query, cnt, adUseClient While Not rs.EOF Sheets("Research_Review").Cells(lineResearch + line, colResearch) = rs.Fields(0) line = line + 1 rs.MoveNext Wend rs.Close cnt.Close 

“触发描述”大到500个字符，当我把这个值复制到Excel中的一个单元时，它只出现，直到300个字符

所以我的问题是：我如何提取logging集中的所有数据？

PS：我已经尝试更改“cnt.CommandTimeout = 60”的超时时间，但它也不起作用

编辑：在表devise领域“触发描述”是一个ntext数据types的FYI。

Answer 1

@ASH给出了答案，使用CopyFromRecordset我可以将所有数据复制到单元格中

Sheets("Test").Range("test").CopyFromRecordset rs