Copying data from one cell when other cell is between a time range

[SamT]

Manually copy one of the Time cells and Paste Special "Values" into a cell formatted as General or Number with 10 decimal places

Compare to (format C1 as number with 11 decimal places, then)

Sub Test()
Range("C1").Value = TimeSerial(23, 0, 0)
End Sub