Jump to content

Macro no funciona


Go to solution Solved by Janlui,

Recommended Posts

Buenas tardes.

Tengo el siguiente código en una macro:

 

Sub Prueba()

hora = Hour(Now)

If hora <= 18 & Sheets("Hoja1").Range("G7") = 1 Then

    MsgBox ("haz esto")
    
ElseIf hora > 18 & Sheets("Hoja1").Range("G7") = 2 Then

    MsgBox ("haz esto otro")
    
Else

    MsgBox ("No se cumple")

End If

End Sub

Sin embargo,  siempre se me ejecuta el Else aunque a priori se cumplan las condiciones del If.

Adjunto el excel de prueba.

¿Alguna idea del por qué no entra en el If ni en el ElseIf?

Gracias
 

Prueba.xlsm

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

Privacy Policy