Hi ng

Trying to create a custom function to return the day of the week
User enters a date in col c

Col b should return the day (Fri, Sat, etc...)

Payroll schedule like this
Friday Day 1
Saturday Day 2
Sunday Day 3
Monday Day 4
Tuesday Day 5
Wednesday Day 6
Thursday Day 7

My custom function:
Function MyDayWeek(Day)
Dim MyDay As String

Select Case Day
Case 1
MyDay = "Sunday"
Case 2
MyDay = "Monday"
Case 3
MyDay = "Tuesday"
Case 4
MyDay = "Wednesday"
Case 5
MyDay = "Thursday"
Case 6
MyDay = "Friday"
Case 7
MyDay = "Saturday"
End Select
End Function

First I use xl internal function weekday to convert serial
=weekday(C2) : returns val of 6 on 6/25/04
I did not specify return type

6/25/04 was a Friday so I setup my Case Select construct to allow fo
this numbering method

Problem:
=MyDayWeek(WEEKDAY(C2)) returns 0

Where did I go wrong

--
Message posted from http://www.ExcelForum.com