Ajour d'une condition de declanchement de macro

bonjour

Une toute petite question , sur l'instruction suivante :

Application.OnTime TimeValue("13:50:00"), "macro"

qui permet de déclencher une macro à 13h50 , comment ajouter une condition supplémentaire de date pour son déclenchement, je voudrais par exemple que cette macro s’exécute une fois le 02/01/2015 à 13:50 .

Merci pour vos réponses

Bonjour,

Une proposition.

La procédure doit copié dans le module 'ThisWorkbook'.

Cdlt.

Option Explicit
Private Sub Workbook_Open()
Dim d As Date
    d = "02/01/2015"
    If Date = d Then
        Application.OnTime TimeValue("13:50:00"), "macro"
    End If
End Sub

Merci beaucoup Eric , en fait ..ca à l'air simple je pensais qu'on pouvais inclure la condition de date dans l'instructiion elle meme

Re,

Après réflexion et consultation de l'aide, tu dois pouvoir faire :

Option Explicit
Private Sub Workbook_Open()
Dim d As Date
    d = "02/01/2015"
    Application.OnTime d + TimeValue("13:50:00"), "macro"
End Sub