created:Run macro based on current date

[yaju1120]

I have created a macro for each of the months in the year that I'd like to automatically run depending on the month we're in.

I've tried using the MonthName variable and the Now function, but it doesn't work. My code is as follows:

If MonthName.(Now()) = "July"
Application.Run "Project Budget.xls'!July"

Else If MonthName.(Now())="August"
Application.Run "Project Budget.xls'!July"
Application.Run "Project Budget.xls'!August"

I'd really appreciate any help I can get on this...

[jasoncw]

See if this works for you:

If Month(Date) = 7 Then
    Application.Run "Project Budget.xls'!July"

ElseIf Month(Date) = 8 Then
    Application.Run "Project Budget.xls'!July"
    Application.Run "Project Budget.xls'!August"

End If

HTH

Jason

[yaju1120]

Jason,

Thanks a bunch for the help...It works to perfection.

J.

[mudraker]

When testing the same item for mulriple results I recommend using Select Case statements

Select Case Month(Date)
Case 7
    Application.Run "Project Budget.xls'!July"
Case 8
    Application.Run "Project Budget.xls'!July"
    Application.Run "Project Budget.xls'!August"
End Select