Choose left 3 cell contents

[SeanEvans]

I have a list of dates ( an entire year ) in the format -

Mon 13 Dec 2004

However I only need the list to contain weekedays i.e. and would like to use a simpla macro to delete the lines that start with Sat or Sun. I just can't figure out the syntax of the command as so far I have been trying stuff like

If ActiveCell.Left(3) = "Sat" Then

to no avail.

Can anyone point out the correct syntax for me ?

Thanks

[blane245]

dim wd as Integer
wd = Weekday(ActiveCell.Value)
if (wd = vbSunday or wd = vbSaturday) Then ...

The Weekday function will do what you want assuming that the cell contents is actually a n Excel date value, not a string that looks like a date.