Try something like:

Sub tcheck()
Dim v As Double
v = Now()
tm = v - Int(v)
If tm 0.45833 Then
MsgBox ("too late - after 11:00 AM")
Else
MsgBox ("its before 11:00 AM")
End If
End Sub

--
Gary's Student
gsnu200704


"Steve" wrote:

I already use this code to execute a macro if the date is Friday. I
want to amend it so that it will run only if it is before 11:00
If (Weekday(Now) = vbFriday) And Sheet5.Range("fri_weather").Value =
"" Then [Friday]

Thanks for nay help you may provide.

Thanks, Steve