記錄集不會返回所有數據VBA

Question

我在嘗試從記錄集提取某些數據時遇到了一些問題，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 

“ TriggerDescription”多達500個字符，當我將此值復制到excel中的單元格時，它只會出現直到300個字符

所以我的問題是：如何從記錄集中提取所有數據？

PS：我已經嘗試使用“ cnt.CommandTimeout = 60”更改超時，但是它也不起作用

編輯：在表設計字段“ TriggerDescription”是一個ntext數據類型FYI。

Answer 1

@ASH給出了答案，使用CopyFromRecordset我可以將所有數據復制到單元格中

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