VBA - Message d'erreur

Résolu
Bonjour tout le monde,

Est-ce que quelqu'un saurait programmer un message d'erreur sur VBA (pour Excel2003) qui s'affiche si la valeur rentrée dans une cellule n'est pas un nombre? L'utilisateur clique alors sur OK, et est renvoyé sur la cellule (qui se serait effacé).

Merci d'avance pour vos réponses !

2 réponses

  1. Parfait, merci beaucoup!
    1. De rien

      Merci de mettre le topic en résolu

      Bonne continuation

      ;o)
  2. Bonjour,

    Dans l'éditeur de la feuille :
    Private Sub Worksheet_Change(ByVal Target As Range)
        If Not IsNumeric(Target.Value) Then
            MsgBox "La valeur n'est pas numérique", vbExclamation, "Erreur saisie"
            Target.Value = ""
            Target.Select
        End If
    End Sub
    


    ;o)