我目前正在编写一段代码,找出两个日期之间有多少个月,然后将每个月作为日期值写入特定单元格。最终目标是将日期放在一列中。代码如下,我确信它可以更简单但我还在学习:
For i = 1 To datedifference
reminderdate = DateAdd("m", -1, reminderdate)
ActiveCell.Offset(1, 0).Select
Selection.Value = reminderdate
Next i
这通常有效,但它将日期值放在一个看似随机的地方,而且更多,每次运行代码时这个地方都会改变。有时值会放在第i列中,有时它们会放在屏幕外的某个位置。它们实际上很少出现在我想要的列中。
这是一个非常奇怪的问题,我之前没有遇到任何类似的事情,我有预感我只是超载excel但是我不确定如何提高代码效率。非常感谢任何帮助。
谢谢!