If time is between 7am and 11am = morning
If time is between 12pm and 5 pm = afternoon
If time is 5pm and < 7pm = Evening
If time is between 7pm and 11pm = Night
If time is between 12am and 6am = midnite

I am having trouble getting the time component of the "DATE TIME" 6/02/03
12:21 AM - to be evaluated by the formula.
Any help would be greatly appreciated

Thanks

Are you trying to do this in a formula or VBA?
gunnerpatt wrote:
If time is between 7am and 11am = morning
If time is between 12pm and 5 pm = afternoon
If time is 5pm and < 7pm = Evening
If time is between 7pm and 11pm = Night
If time is between 12am and 6am = midnite

I am having trouble getting the time component of the "DATE TIME" 6/02/03
12:21 AM - to be evaluated by the formula.
Any help would be greatly appreciated

Thanks

Here's a VBA Function that might help
Click alt+F11 to open VBE (visual basic editor). Click Insert ==
Module, paste the code below into the window.

Function TimeTest(ByVal target As Date) As String
On Error Resume Next
If TimeValue(target) = #7:00:00 AM# And TimeValue(target) < #12:00:00
PM# Then
TimeTest = "Morning"
ElseIf TimeValue(target) = #12:00:00 PM# And TimeValue(target) <
#5:00:00 PM# Then
TimeTest = "Afternoon"
ElseIf TimeValue(target) = #5:00:00 PM# And TimeValue(target) <
#7:00:00 PM# Then
TimeTest = "Evening"
ElseIf TimeValue(target) = #7:00:00 PM# And TimeValue(target) <
#12:00:00 AM# Then
TimeTest = "Night"
ElseIf TimeValue(target) = #12:00:00 AM# And TimeValue(target) <
#7:00:00 AM# Then
TimeTest = "Midnight"
Else
TimeTest = "Error"
End If
End Function


Now use this function in your spreadsheet =TimeTest(Time) where "time"
is the cell you want to test, ie. =TimeTest(A1)

hope this work for you

Sandy


gunnerpatt wrote:
If time is between 7am and 11am = morning
If time is between 12pm and 5 pm = afternoon
If time is 5pm and < 7pm = Evening
If time is between 7pm and 11pm = Night
If time is between 12am and 6am = midnite

I am having trouble getting the time component of the "DATE TIME" 6/02/03
12:21 AM - to be evaluated by the formula.
Any help would be greatly appreciated

Thanks

Here's a VBA Function that might help
Click alt+F11 to open VBE (visual basic editor). Click Insert ==
Module, paste the code below into the window.

Function TimeTest(ByVal target As Date) As String
On Error Resume Next
If TimeValue(target) = #7:00:00 AM# _
And TimeValue(target) < #12:00:00 PM# Then
TimeTest = "Morning"
ElseIf TimeValue(target) = #12:00:00 PM# _
And TimeValue(target) < #5:00:00 PM# Then
TimeTest = "Afternoon"
ElseIf TimeValue(target) = #5:00:00 PM# _
And TimeValue(target) < #7:00:00 PM# Then
TimeTest = "Evening"
ElseIf TimeValue(target) = #7:00:00 PM# _
And TimeValue(target) < #12:00:00 AM# Then
TimeTest = "Night"
ElseIf TimeValue(target) = #12:00:00 AM# _
And TimeValue(target) < #7:00:00 AM# Then
TimeTest = "Midnight"
Else
TimeTest = "Error"
End If
End Function


Now use this function in your spreadsheet =TimeTest(Time) where "time"
is the cell you want to test, ie. =TimeTest(A1)

hope this work for you

Sandy


gunnerpatt wrote:
If time is between 7am and 11am = morning
If time is between 12pm and 5 pm = afternoon
If time is 5pm and < 7pm = Evening
If time is between 7pm and 11pm = Night
If time is between 12am and 6am = midnite

I am having trouble getting the time component of the "DATE TIME" 6/02/03
12:21 AM - to be evaluated by the formula.
Any help would be greatly appreciated

Thanks

You have been incnsistent as to where you drew your boundaries in some
cases, but try
=IF(HOUR(A1)<7,"midnite",IF(HOUR(A1)<12,"morning", IF(HOUR(A1)<17,"afternoon",IF(HOUR(A1)<19,"Evening ","Night"))))
--
David Biddulph

"gunnerpatt" wrote in message
...
If time is between 7am and 11am = morning
If time is between 12pm and 5 pm = afternoon
If time is 5pm and < 7pm = Evening
If time is between 7pm and 11pm = Night
If time is between 12am and 6am = midnite

I am having trouble getting the time component of the "DATE TIME" 6/02/03
12:21 AM - to be evaluated by the formula.
Any help would be greatly appreciated

Thanks