excel - 如何创建 RTD 函数输出的历史日志

Question

我想存储不断变化的 RTD 函数的值。假设我设置单元格A1 = SomeRTDFunction(）。我应该如何处理这个？

我想到的一种可能性是创建一个Sub在某个计时器上连续运行的值，而不是从该单元格复制值并将其连续放入另一个单元格。

有一个更好的方法吗？

Answer 1

这将每秒更新Range("A1").Value一次。Your_RTD_Function

Sub RunRTDFunctionContinuously()

    Dim nextSecond As Date

    nextSecond = DateAdd("s", 1, Now())

   'Your instruction below  

   Range("A1").Value = Your_RTD_Function

    Application.OnTime _
        Procedure:="RunRTDFunctionContinuously", _
        EarliestTime:=nextSecond

End Sub