在本文中，您将学习如何使用VBA代码每1秒自动刷新excel文件。

问题）：在A列中存储了一些值，我希望它们每1秒钟自动刷新一次。

要每1秒钟刷新一次excel文件，我们将执行以下步骤：

在范围A1：A10中；使用RAND函数我们需要按照以下步骤启动VB编辑器：单击“开发人员”选项卡。从“代码”组中，选择Visual Basic

img1

。

===

  • 单击插入，然后单击模块

img2

这将创建新的模块。

在模块

中输入以下代码=== Sub Calculate_Range（）

Range（“ A1：A5”）。计算

Application.OnTime DateAdd（“ s”，1，Now），“ Calculate_Range”

结束子

img3

  • 上面的代码使用了代码application.ontime，该代码用于自动计算范围A1：A5以每1秒刷新一次。

  • 范围A1：A5包含RAND函数，它将每隔1秒

img4

不断更新。这样，我们可以安排excel文件每x刷新一次时间并保存。