Advance By Month With A CommandButton
oops missed the button bit.
--
HTH
RP
"Myrna Larson" wrote in message
...
One way:
With ActiveSheet.Range("C10")
.Value = DateAdd("m",1,.Value)
End With
Another way
With ActiveSheet.Range("C10")
d = .Value
.Value = DateSerial(Year(d), Month(d) + 1, Day(d))
End With
On Mon, 25 Oct 2004 13:16:35 -0500, Minitman
wrote:
Greetings,
I have a worksheet with a date in C10 in mmm/yyyy formant. I made a
CommandButton (NextMonth) to advance the date by 1 month. I have a
problem, I used +30 to advance which works for the short term.
However, I am going back 12 years and getting a lot of errors in the
date.
Is there anyway to advance by one month at a time?
Any help would be appreciated.
TIA
-Minitman
|