Comparaison de 2 dates et message d'alerte

Bonjour,

Dans une cellule j'indique la date du jour

Dans une seconde cellule, à partir d'une liste de données j'indique la date de la note de frais.

Je souhaiterai lorsque je sélectionne en cellule L11, avoir à l'écran un message d'erreur si la date en L11 est supérieure à la date du jour

Merci pour votre aide

Cordialement

Philmaure

5test.xlsx (33.92 Ko)

Bonjour

Avec une macro

10test.xlsm (38.30 Ko)

A+ François

Super

Un grand merci

Philmaure

Bonjour le forum

Bonjour philmaure, bonjour François

@fanfan38 : Pour ma part, je préférerais mettre WorkSheet_Change afin que notre ami ait immédiatement le MsgBox dès sa sélection de date en cellule L11.

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = Range("L11").Address Then
    If Range("L11") > Range("O1") Then
      MsgBox ("Date supérieure à la date du jour")
    End If
  End If
End Sub

Bonne continuation à vous deux.

P.s : François, si tu as un instant de dispo, j'ai déposé une demande mais au niveau photo... Pas trop top pour moi.

@micalement

Rechercher des sujets similaires à "comparaison dates message alerte"