Access table set start of day and end of day to my schedule

[Tcurtis]

Good Afternoon,
I am trying to convert a Date/Time in a table to give me a Day or Night shift designation.
I have a column in a table that has a Date/Time Stamp with AM and PM and need to know if the event listed on the date is during the night shift or the day shift.
Day shift begins at 7:00:00 AM and ends at 6:59:59 PM. Night shift begins at 7:00:00 PM and ends at 6:59:59 AM.
I would like to have a query or VBA update my table with a new column that gives me the correct designation of D or N according to the Start and Stop times of each shift. Below is how my column is laid out.

Thanks

Posting_Date

1/18/2023 8:04:21 AM

1/18/2023 8:04:21 AM

1/18/2023 11:50:46 AM

1/17/2023 10:59:03 AM

1/18/2023 11:51:56 AM

1/18/2023 11:28:46 AM

1/18/2023 11:00:17 AM

1/18/2023 11:04:00 AM

1/17/2023 11:10:03 AM

1/18/2023 12:29:08 PM

1/17/2023 10:58:02 AM

1/18/2023 11:02:33 AM

1/17/2023 1:06:22 PM

1/18/2023 11:22:52 AM

1/18/2023 12:34:37 PM

1/17/2023 3:46:37 PM

1/17/2023 3:45:42 PM

1/17/2023 10:58:30 AM

1/18/2023 11:09:01 AM

1/18/2023 10:37:40 AM

1/18/2023 11:20:53 AM

1/18/2023 11:50:46 AM

1/17/2023 1:11:55 PM

1/17/2023 1:08:15 PM

1/17/2023 3:42:19 PM

1/17/2023 2:23:28 PM

1/17/2023 2:14:39 PM

1/17/2023 11:12:50 AM

1/18/2023 11:09:01 AM

1/17/2023 3:46:04 PM

1/17/2023 1:11:55 PM

1/18/2023 11:22:52 AM

1/17/2023 2:23:28 PM

1/17/2023 2:23:28 PM

1/17/2023 3:48:50 PM

1/17/2023 3:49:44 PM

1/17/2023 3:49:44 PM

1/18/2023 11:14:29 AM

1/18/2023 11:36:08 AM

1/18/2023 11:20:53 AM

1/18/2023 11:14:29 AM

1/18/2023 11:14:29 AM

1/18/2023 12:27:32 PM

1/18/2023 10:57:19 AM

1/18/2023 11:20:53 AM

1/18/2023 11:50:46 AM

1/18/2023 12:20:24 PM

1/18/2023 11:36:08 AM

1/18/2023 11:01:38 AM

 

[alansidman]

Created a new field called Time with the following expression first

Time: TimeValue([Posting_Date])

Try this SQL statement in a query

SELECT Times.Posting_Date, TimeValue([Posting_Date]) AS [Time], IIf(TimeValue([Time])>#12/30/1899 18:59:59# Or TimeValue([Time])<#12/30/1899 7:0:0#,"night","day") AS [Day/Night]
FROM Times;

Change Times (my table name) to whatever your table name is

 

[Tcurtis]

This works perfectly, Thank you so much for the input. I appreciate it.
Have a great day