Excel VBA FOR循环将值放入随机单元格中

时间:2016-08-05 10:12:16

标签: excel vba for-loop

我目前正在编写一段代码,找出两个日期之间有多少个月,然后将每个月作为日期值写入特定单元格。最终目标是将日期放在一列中。代码如下,我确信它可以更简单但我还在学习:

For i = 1 To datedifference

    reminderdate = DateAdd("m", -1, reminderdate)
    ActiveCell.Offset(1, 0).Select
    Selection.Value = reminderdate

Next i

这通常有效,但它将日期值放在一个看似随机的地方,而且更多,每次运行代码时这个地方都会改变。有时值会放在第i列中,有时它们会放在屏幕外的某个位置。它们实际上很少出现在我想要的列中。

这是一个非常奇怪的问题,我之前没有遇到任何类似的事情,我有预感我只是超载excel但是我不确定如何提高代码效率。非常感谢任何帮助。

谢谢!

0 个答案:

没有答案