在Excel VBA中增加date

这是我现在的代码：

For z = 3 To 52 Cells(z, 1) = Cells((z - 1), 3) + 7 Next z 

单元格z-1是date

我想添加7天到前一个单元格，但它是抛出一个错误，这是正确的方法来解决这个问题，还是有一个更简单的方法？

谢谢

Answer 1

尝试使用DateAdd函数，在循环中使用：

 Cells(Z, 1) = DateAdd("ww", 1, Cells((Z - 1), 3)) 

注意 ：第一个参数是Interval ，设置为"ww" ，意思是星期。

要阅读有关此function的更多信息，请转到MSDN