Thread: date format
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Jeff Jeff is offline
external usenet poster
 
Posts: 921
Default date format

Try this

Public Function WeekdayName(ByVal aDate As Date) As String

aDate = Format(aDate, "yyyy-mm-dd")

Select Case Weekday(aDate)
Case 1
WeekdayName = "Sunday"
Case 2
WeekdayName = "Monday"
Case 3
WeekdayName = "Tuesday"
Case 4
WeekdayName = "Wednesday"
Case 5
WeekdayName = "Thursday"
Case 6
WeekdayName = "Friday"
Case 7
WeekdayName = "Saturday"
End Select
End Function


"Stephen" wrote:

Hi Folks,

I'm running a query and one of my columns returns a delivery date that is
formated as yyyy-mm-dd. Although the column is formatted as a general field,
I'm trying to changed the output to read Monday or Tuesday, etc. It seems
that due to the format of yyyy-mm-dd excel won't recognize this as a date
when I change the cells formatting.

I have a feeling I'm going to have to reformat the output to read mm/dd/yyyy
in order to then change it again to read Monday, Tuesday, etc. But I have
absolutely no idea where to start.

TIA!