Message suivant la date

[Jacky]

Bonsoir tout le monde,

j'aurais voulu savoir si l'on pouvait suivant une date afficher un
message.
ex: un rendez-vous et que le message apparaisse a la date prévu

j'ai regarder dans les archives et rien trouver,si par mégarde
j'avais zapper se post,quelqu'un pourrait il me dire ou il se trouve

par avance merçi et à bientôt

 

[anonymousA]

imaginons que dans la cellule A1, il y ait une date de RdV (p.e 05/04/2005)et que l'on ouvre le fichier.

Dans le module Thisworkbook du fichier en question, tu écris

Private Sub Workbook_Open()

If Cells(1, 1) < Now Then MsgBox 'toto'

End Sub

Dans ces conditions, si tu ouvres le fichier après le 05/04/2005 alors le message s'affichera.

Il est clair que ceci ne fonctionnera que si tu ouvres le fichier.


A+

 

[jacky]

merçi anonymousA,

je vais essayer

à bientôt