单元格日期自动累计加1

楼月

大佬好：   本人需要单元格里的日期每刷新一次自动加1，到2021/12/31，后自动返回2021/1/1，如何用公式实现，请大佬指点

日起自动累加.rar (9.41 KB, 下载次数: 15)

2021-10-3 08:38 上传

点击文件名下载附件
日起自动累加.rar

邪帝

想法不现实。可以打开迭代计算，设置1次。但是数据不固定，不稳定。

幸福的约定

没有大佬知道吗？

精诚小邓

Sub tt()
  ActiveWorkbook.RefreshAll
  If Range("e3").Value < DateValue("2021-12-31") Then
  Range("e3") = Range("e3") + 1
  Else
  Range("e3") = DateValue("2021-1-1")
  End If
End Sub

vba手动刷新呢？

愿作涓涓溪流

这种事情不如用VBA
楼上大佬给出了VBA方案了