Excel - VBA CopyFromRecordset 字段限制 256

编程问答 2022-05-26

问题描述

我正在尝试通过 ADO 将一些 excel xlsx 文件中的数据复制到我的 excel 文件中。数据文件有 282 列，但我刚刚发现字段的限制最多只有 256。

有人知道是否有办法扩展该限制吗？

以防万一我使用的是 Office 365。下面的部分代码：

    MyConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & _
                         SourceFile & _
                        ";Extended Properties=""Excel 12.0 Xml;HDR=YES"";"
                        
    Set MyCon = CreateObject("ADODB.Connection")
    MyCon.Open ConnectionString:=MyConnectionString
    
    Set MyRecordset = CreateObject("ADODB.RecordSet")
 
    i = 6
    For Each Ticker In TickerArray
        SQLString = "SELECT * FROM [Dashboard$A:JV] where Símbolo = '" & Ticker & "'"
        
        MyRecordset.Open Source:=SQLString,_
                         ActiveConnection:=MyCon,_
                         CursorType:=adOpenKeyset,_
                         Options:=adCmdText

       Debug.Print MyRecordset.Fields.Count

Debug.Print MyRecordset.Fields.Count = 255 的结果

提前致谢

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

adoexcelexcelsqlsql