Message en fonction d'une date

Résolu
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
Configuration: Windows XP
Firefox 3.0.9

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Modérateur
    Salut,
    Tout simplement :
    If Range("A1") < CDate(Date) Then MsgBox ("message")
    1. En effet c'etait pas plus compliquer que sa ^^

      merci et bonne journée
      1. Modérateur
        Mettez votre post en résolu. Merci
        @+