I would like to calculate rollong calendar from today in the loop.

For example, today is Dec/11/2008 and I need to get all informaiton 12
months before today. (from Dec/11/2007 to Dec/11/2008).

I just wonder can DateSerila do the job.

For example, DateSerial(MyYear, MyMonth - i, MyDay)

Will DateSerial changed the year if the month is minus number?

Your information is great appreciated,

Are you attempting to construct a loop that will iterate through each day of
the previous 12 months? If so, you can do that directly in the For statement
of your For..Next loop. Consider this (and notice that D is declared as
Date)...

Sub Test()
Dim D As Date
For D = DateAdd("m", -12, Date) To Date
Debug.Print D
Next
End Sub

The above code will print the date for each day for the previous year...
just replace it with the code you actually want to operate on those days.

--
Rick (MVP - Excel)


"inungh" wrote in message
...
I would like to calculate rollong calendar from today in the loop.

For example, today is Dec/11/2008 and I need to get all informaiton 12
months before today. (from Dec/11/2007 to Dec/11/2008).

I just wonder can DateSerila do the job.

For example, DateSerial(MyYear, MyMonth - i, MyDay)

Will DateSerial changed the year if the month is minus number?

Your information is great appreciated,

And to answer your question directly, yes, DateSerial will properly handle
the year when the month goes negative.

--
Rick (MVP - Excel)


"Rick Rothstein" wrote in message
...
Are you attempting to construct a loop that will iterate through each day
of the previous 12 months? If so, you can do that directly in the For
statement of your For..Next loop. Consider this (and notice that D is
declared as Date)...

Sub Test()
Dim D As Date
For D = DateAdd("m", -12, Date) To Date
Debug.Print D
Next
End Sub

The above code will print the date for each day for the previous year...
just replace it with the code you actually want to operate on those days.

--
Rick (MVP - Excel)


"inungh" wrote in message
...
I would like to calculate rollong calendar from today in the loop.

For example, today is Dec/11/2008 and I need to get all informaiton 12
months before today. (from Dec/11/2007 to Dec/11/2008).

I just wonder can DateSerila do the job.

For example, DateSerial(MyYear, MyMonth - i, MyDay)

Will DateSerial changed the year if the month is minus number?

Your information is great appreciated,

On Dec 11, 12:29*pm, "Rick Rothstein"
wrote:
And to answer your question directly, yes, DateSerial will properly handle
the year when the month goes negative.

--
Rick (MVP - Excel)

"Rick Rothstein" wrote in message

...



Are you attempting to construct a loop that will iterate through each day
of the previous 12 months? If so, you can do that directly in the For
statement of your For..Next loop. Consider this (and notice that D is
declared as Date)...

Sub Test()
*Dim D As Date
*For D = DateAdd("m", -12, Date) To Date
* *Debug.Print D
*Next
End Sub

The above code will print the date for each day for the previous year....
just replace it with the code you actually want to operate on those days.

--
Rick (MVP - Excel)

"inungh" wrote in message
....
I would like to calculate rollong calendar from today in the loop.

For example, today is Dec/11/2008 and I need to get all informaiton 12
months before today. (from Dec/11/2007 to Dec/11/2008).

I just wonder can DateSerila do the job.

For example, DateSerial(MyYear, MyMonth - i, MyDay)

Will DateSerial changed the year if the month is minus number?

Your information is great appreciated,- Hide quoted text -

- Show quoted text -

Thanks millions,