Crear cuenta
'----------
h1 = Format(Time, "hh:mm:ss")
h2 = Format((TimeValue("07:00:00 P.M.")), "hh:mm:ss")
'----------
If h1 >= h2 Then 'MANDA EL ERROR AQUI
'----------
h1 = Abs(Val(Format(Time, "hh:mm:ss")))
h2 = Abs(Val(Format((TimeValue("19:00:00")), "hh:mm:ss")))
'----------
If h1 >= h2 Then
DIM h1 as date, h2 as date '###### Sera este el Error la definicion de las variables h1, h2
'----------
h1 = Abs(Val(Format(Time, "hh:mm:ss")))
h2 = Abs(Val(Format((TimeValue("19:00:00")), "hh:mm:ss")))
'----------
If h1 >= h2 Then
DIM h1 as date, h2 as date '###### Sera este el Error la definicion de las variables h1, h2
'----------
h1 = Abs(Val(Format(Time, "hh:mm:ss")))
h2 = Abs(Val(Format((TimeValue("19:00:00")), "hh:mm:ss")))
'----------
If h1 >= h2 Then
'----------
h1 = Format(Time, "hh:mm:ss")
h2 = Format((TimeValue("07:00:00 P.M.")), "hh:mm:ss")
'----------
If h1 >= h2 Then'MANDA EL ERROR AQUI
If Format(Time, "hh:mm:ss") > "19:00:00" Then