1

我正在尝试在 VBA中获取RTD输出。问题是数据有时需要几秒钟才能返回，所以当我运行一个循环的一半时间它错误地返回 0。显然 RTD 正在异步运行。如何将其设置为同步运行以等待正确的输出？

如果我把公式放在一个单元格中，它通常会立即返回，有时需要一秒钟。如果我尝试在 VBA 中循环，它会过快地转到下一个值并返回误报，因为它没有等待数据返回。我已经尝试过 RTD.RefreshData，但它的加载速度不足以跟上我的循环。（我的目标是使用 RTD 遍历数千个字段，这就是我需要这样做的原因）

4

1 回答 1

1

如何在循环中等待条件得到满足：

Do Until Cells(1, 1) <> "" ' use plausible condition
    Application.Wait (Now + TimeValue("0:00:01"))
Loop
于 2014-11-26T16:59:33.017 回答