<HTML>Pas tout compris non plus ;-)
tu veux faire une macro ?
à la main tu peux saisir une valeur dans plusieurs cellules en même temps
fais une sélection étendue, apuuye sur F2 pour rentrer en mode édition, tape ta date, et valide non pas par Entrée mais par "Ctrl Maj Entrée"
bye
steph
en prime
Sub testDates()
Dim c As Range
For Each c In Selection
If c.Value <= Date And Not IsEmpty(c) Then
MsgBox "La cellule " & c.Address _
& " contient une date inférieure ou égale à la date du jour."
End If
Next c
end sub</HTML>