One way:

If Sheet5.Range("fri_weather") = vbNullString Then _
If WeekDay(Date) = vbFriday Then _
If Time < TimeSerial(11, 0, 0) Then _
[Friday]

In article om,
"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