If Conditional Expression based on day of week

[meagain]

Hi,

We're looking for an If conditional expression to enter in a macro, to run an action based on whether it is a weekday other than Monday.

Thank you,
Lori

 

[Andrzejek]

You may want to explore VBA Weekday Function and add to your macro some logic like:

MsgBox Weekday(Date())
MsgBox WeekdayName(Weekday(Date()))

Select Case Weekday(Date())
    Case 1, 2, 7     [green]'Sun, Mon, Sat
  [/green]  
    Case Else   [green]'All other days[/green]

End Select

---- Andy

There is a great need for a sarcasm font.

 

[meagain]

Hi,

Thanks for your response.

I went with [green]If Weekday(Date())<>2 Then[/green] ...

It works great