Excel VBA 日期时间自动添加

Excel VBA Date Time Add Automatically

我在 Excel Sheet 上有以下值。

A1 = 2018-01-01 00:00:00
A2 = 2018-01-07 23:59:59

我想自动更改值,比如说每天 1AM。 更改应如下所示:
A1 = 2018-01-01 00:00:00A1 = 2018-01-08 00:00:00A2 值之后的第二天,从 A2A1 加上 7 天。所以,应该是 A2 = 2018-01-15 23:59:59.

可以吗?请指教
谢谢。

在VBA中,可以使用DateAdd功能。例如:

NewDate = DateAdd("d", 7, "2018-01-01 00:00:00")

每凌晨 1 点 运行 将其放入 Sub 程序(例如 my_Procedure)并使用 Application.OnTime 方法安排它:

Application.OnTime TimeValue("1:00:00"), "my_Procedure", , False