Pb controle saisie dans une box

fancoco Messages postés 1 Date d'inscription   Statut Membre -  
LatelyGeek Messages postés 1774 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Al'aide , comment contrôler le type de donnée saisie dans une box(inputbox), lsaisie doit etre de type numérique dans le cas d'une saisie texte(alpha) je ne souhaite pas voir apparaitre la fenetre visual basic après plantage mais une question permettant une nouvelle saisise
Merci ça Urge
Fancoco
Configuration: Windows XP
Internet Explorer 7.0

1 réponse

  1. LatelyGeek Messages postés 1774 Date d'inscription   Statut Membre Dernière intervention   550
     
    Je t'ai écrit un petit module qui teste si la valeur que tu rentres est numérique ou non... Débrouille toi avec ça!!

    Sub TextNumérique()
    Dim Réponse As String
    Réponse = InputBox("Entrez une valeur numérique")
    If IsNumeric(Réponse) Then
    MsgBox (Val(Réponse))
    Else
    MsgBox "Réponse non valide"
    End If
    End Sub
    0