Créer une mgbox dans une macro ou une procédure

randall Messages postés 531 Date d'inscription   Statut Membre Dernière intervention   -  
cs_Le Pivert Messages postés 8437 Statut Contributeur -

Bonjour,

Comment faire une macro pour indiquer que la valeur entrée dans une cellule (exemple feuille 1 cellule A1)doit être un nombre pair par une mgbox

si le nombre est impair déclencher une mgbox pour indiquer qu'il faut rentrer un nombre pair

Merci pour la réponse

ndows / Chrome 107.0.0.0

2 réponses

  2.
    cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     

    bonjour,

    faire Alt F11 sur la feuille concernée pour accéder à l'éditeur et mettre ce code:

    Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value Mod 2 <> 0 Then
MsgBox "Entrez un chiffre pair!", vbCritical, "Saisie"
Target.Value = ""
End If
End Sub
    0