get week day of a date

[ashishprem]

Hi All,
I want some help regarding date function in macro. I want to know th
week day number of the date. For eg on 30/12/2005 its Friday. I want th
week day number. For eg Sunday -1 ,Monday -2 .... Friday -6 Saturday
7.
For 30/12/2005, the result will be 6. Is there any function to get th
week day number?

Regards
Ashis

 

[Gary Keramidas]

this should do it, i used a1 for the date and b1 for the result

Sub test()
Range("b1").Value = Weekday(Range("a1"))
End Sub

just for reference, if you wanted monday for the first day of the week, then you
would use this and the value would be 5

Range("b1").Value = Weekday(Range("a1"), vbMonday)

 

[Nigel]

Excel worksheet formula WEEKDAY yields the value you require e.g.
=WEEKDAY(A1,1)

The same can be used in VBA code e.g.

MyDOW = Weekday(Range("A1"),1)