VBA宏将连续月末回归

Question

这是我在这个网站上的第一篇文章.

我需要一些VBA代码的帮助,这些代码将31/07/00放入单元格"B2",然后每个月末日期在列中,并在2010年11月31日在单元格"B126"中停止(即单元格B2 = 31/07/00,BA3 = 31/08/00,B4 = 30/09/00等等).我应该为此做一个循环吗？我不能用宏录音机真正做到这一点,这就是我学习大部分VBA编码的方法.

谢谢大家的帮助.

Answer 1

Sub FillDates()

    With Sheet1.Range("B2")
        .Value = DateSerial(2000, 7, 31)
        .AutoFill .Resize(125, 1), xlFillMonths
    End With

End Sub

这将第一个日期放在B2中,然后使用Excel的自动填充(来自Joel的答案的填充句柄)来填充接下来的125行中的月份.