如何在Excel中每隔0.1秒自动更改列出的单元格的值

Question

单元格A1由包含数字（1,2,3,4,5，....）的列表组成 我想要的是，当我启动宏时，单元格A1的值应该每隔0.1秒递增一次到下一个数字...

我无法找到特定于蚂蚁时间的excel代码来做到这一点

Answer 1

Lesnar，您可以尝试一下此宏

Sub CellTimer()

    Sheet1.Range("A1").Value = 1
    Do
       Application.Wait (Now() + TimeValue("0:00:01"))
       Sheet1.Range("A1").Value = Sheet1.Range("A1").Value + 1
    Loop

End Sub