Message en fonction d'une date

Résolu/Fermé
Link - 18 août 2009 à 16:27
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 18 août 2009 à 16:47
Bonjour,

Je vous écris car j'aimerai qu'un message d'alerte se lance lorsque une date est inférieure à celle d'aujourd hui.

J'ai un code qui le fait mais en fonction d'un nombre donc si quelqu'un savais transformer sa en date sa serais sympas

Code : Private sub Worksheet_Calculate ()

If range ("A1") < 3 Then MsgBox "message"


Merci d'avance
A voir également:

2 réponses

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 759
18 août 2009 à 16:30
Salut,
Tout simplement :
If Range("A1") < CDate(Date) Then MsgBox ("message")
0
En effet c'etait pas plus compliquer que sa ^^

merci et bonne journée
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 759
18 août 2009 à 16:47
Mettez votre post en résolu. Merci
@+
0