How to identify todays day, not date?

Todd_M · Apr 9th, 2002, 04:59 PM

Hi-

Private Sub CommandButton2_Click()
If today = Tuesday Then
MsgBox "OK"
End If
End Sub

How do you write a code that tells what today's day is, so that if today is Tuesday, then a msgbox pops up?

Juan Pablo González · Apr 9th, 2002, 05:11 PM

Quote:

On 2002-04-09 15:59, Todd_M wrote:
Hi-

Private Sub CommandButton2_Click()
If today = Tuesday Then
MsgBox "OK"
End If
End Sub

How do you write a code that tells what today's day is, so that if today is Tuesday, then a msgbox pops up?

Some options:

If Weekday(Date,vbMonday) = 2 then

or

If Format(Date,"ddd") = "tue" then

or

If Format(Date,"dddd" = "tuesday" then

Todd_M · Apr 9th, 2002, 05:25 PM

Thanks Juan

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Apr 9th, 2002, 04:59 PM	#1
Todd_M Board Regular Join Date: Feb 2002 Posts: 117	Hi- Private Sub CommandButton2_Click() If today = Tuesday Then MsgBox "OK" End If End Sub How do you write a code that tells what today's day is, so that if today is Tuesday, then a msgbox pops up?

Apr 9th, 2002, 05:25 PM	#3
Todd_M Board Regular Join Date: Feb 2002 Posts: 117	Thanks Juan