DIAS ÚTEIS E HORÁRIO COMERCIAL?

Question

PRECISO DE UM CÓDIGO EM VB QUE ENGLOBE AS SEGUINTES CONDIÇÕES:

SE HOJE FOR DE SEGUNDA A SEXTA

SE AGORA FOR DEPOIS DAS 9:59

SE AGORA FOR ANTES DAS 18:01

CALL MACROX

Answer 1

If weekday(now()) >=2 and weekday(now()) <=6 Then
   if time() > #09:59# and time() <#18:01# Then
      call nomeDaFuncao
   end if
end if

Answer 2

If Weekday(Date, vbMonday) <= 5 And _
   Time >= #9:59:00 AM# And _
   Time <= #6:01:00 PM# Then
   Call MACROX
End If

---

Rafael Kamimura