Exécuter une macro à une date après une heure précise

ascal44

XLDnaute Occasionnel
Bonsoir , j'essai un code pour lancer une macro à une date après une heure précise.
Mais je ne trouve pas ce qui bloque , pouvez vous m'aider ?

Le code ci dessous :
VB:
Option Explicit
Sub classeur()
If Date > "5/03/2019 21:54:00" Then ' Lance la macro le 5 mars 2019 si l'heure est supérieure à 21H54
    With ThisWorkbook
              
        Call miseajour
        
    End With
End If
End Sub
 
C

Compte Supprimé 979

Guest
Bonjour
"Date" renvoie la date du jour jour uniquement
Si tu veux pouvoir comparer également l'heure, il faut utiliser "Now()"
Et l'instruction est
Code:
Sub Classeur()
' Lance la macro le 6 mars 2019 si l'heure est supérieure à 21H54
  If Now() > "06/03/2019 21:54:00" Then
    MsgBox "Date et heure dépassée"
        'Call miseajour
  End If
End Sub

Pas besoin de "With ThisWorkbook" !?

A+
 

Discussions similaires