Question

我有一个大的VBA脚本，它启动一个外部程序，等待，然后将结果读入几个数组并在表中写入一些值。所以我经常在以下地方收到错误

Sheets("Calc").Cells(active_line_num, 1).Value = PiKa(i, j)

其中 PiKa 是一个数组; i ， j 是可行的指标，

active_line_num 也具有完全可行的值。这些行在外部循环中，并且大多数它没有问题。但是在一些迭代中它会停止。

所以程序破解并建议我调试它。在调试模式下，如果我立即按F8（下一步），它会重现错误。但是如果我按下F8，那么在某个时间（一两分钟）之后 - everythig正在进一步运行，没有任何错误。

错误运行时错误'9'，下标超出范围

这是两个印刷品imgur.com/a/MOPwd 可以看出，PiKa（9,6）以及接下来的4个数组都存在，甚至还有非零值。所有这些数组都在模块中定义为

Public PiKa() as Double

w / o维度然后在程序的开始时重新编写一次（不在循环中！）

ReDim PiKa(0 To nrc, 0 To 99)

它有什么用？