Bonjour à tous !

Mon problème est simple mais me prend la tête depuis quelques heures :
J'ai cette condition :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
MsgBox Format(ActiveCell.Offset(0, 2).Value, "dd/mm/yyyy")
MsgBox Format(Evaluate("DATE(YEAR(TODAY()),MONTH(TODAY()) ,0)+1"), "dd/mm/yyyy")
If Format(ActiveCell.Offset(0, 2).Value, "dd/mm/yyyy") < Format(Evaluate("DATE(YEAR(TODAY()),MONTH(TODAY()) ,0)+1"), "dd/mm/yyyy") Then
            MsgBox "La date de la cellule est inférieure au début du mois en cours."
Mon "ActiveCell.Offset(0, 2).Value" contient "01/03/2012" (confirmé par la MsgBox), et idem j'ai bien la date de début de ce mois avec la MsgBox (01/05/2011).
Or il rentre dans ma condition et m'affiche le MsgBox "La date de début blabla...", pourtant 01/03/2012 n'est pas inférieur à 01/05/2011 !

Merci d'avance...