为何Excel 2016 VBA中无法用LongPtr/LongLong重定义数组？

嘿，这个问题我之前帮同事排查过，刚好能给你讲清楚来龙去脉和解决思路！

核心原因：VBA数组索引的底层限制 #

不管是32位还是64位版本的Excel VBA，数组的索引参数只接受Long类型（32位整数），哪怕你用了64位的LongPtr或LongLong类型，VBA的数组引擎也不支持将这两种类型作为ReDim的索引值——这就是你触发“类型不匹配（错误13）”的根本原因。

为什么之前Win7+Excel2010能正常运行？因为在32位环境下（哪怕系统是64位，Excel2010默认可能是32位），Long和LongPtr都是32位整数，本质上是同一个类型，所以用Long当索引没问题；升级到64位Excel2016后，LongPtr变成了64位整数，和Long类型不兼容，自然就报错了，换成LongLong（同样是64位）也会遇到同样的问题。

具体解决办法 #

分两种场景处理：

• 场景1：数组大小未超过Long类型上限（2147483647）
  这是绝大多数Excel场景的情况（毕竟Excel 2016的最大行数才1048576，远小于21亿），你只需要把索引变量强制转换为Long类型即可，比如：

  Dim myIndex As LongPtr
  myIndex = 1000000
  ReDim myArr(CLng(myIndex)) ' 强制转成Long类型
  

  或者直接将索引变量声明为Long类型，避免类型不匹配的问题。

• 场景2：确实需要超过21亿元素的超大数组
  这种情况非常罕见，但如果真的有需求，你可以采用以下方案：

  • 拆分多个小数组，用一个主数组来管理这些子数组
  • 使用嵌套的Variant数组来模拟超大数组
  • 调用Windows API的内存分配函数（比如VirtualAlloc）直接分配内存，但这种方式需要对内存管理有一定了解，且脱离了VBA数组的原生操作逻辑。

额外提醒 #

别混淆LongPtr和LongLong的设计目的：

• LongPtr是用来处理内存指针的，目的是兼容32位和64位环境下的地址访问，不是用来扩展数组索引的
• LongLong是用来存储64位整数的，但VBA的数组对象并不支持用它作为索引参数

内容的提问来源于stack exchange，提问作者PaichengWu