VBA - Controle de saisie

Tehani_t Messages postés 245 Statut Membre -  
Bidouilleu_R Messages postés 1209 Statut Membre -
Bonjour,

Comment fait on pour limiter la saisie d'un utilisateur à une saisie numérique (les espaces étant exclus également) ?? Qui peut m'aider ?

Merci !

3 réponses

  1. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    Avec du VBA (comme indiqué dans le titre)

    https://silkyroad.developpez.com/VBA/ControlesUserForm/#LII-E

    ( voir la rubrique textbox)

    'avec la virgule non valide (entier)
    Private Sub textBox1_Change()
        On Error Resume Next
        
        If Not IsNumeric(Right(TextBox1, 1)) Then
            MsgBox "Le caractere saisi n'est pas valide"
            TextBox1 = Left(TextBox1, Len(TextBox1) - 1)
        End If
    End Sub
    1
  2. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 784
     
    Utilise la commande Données, Validation et choisi selon ton besoin nombre entier ou nombre décimal
    0
  3. Mytå Messages postés 4246 Date d'inscription   Statut Contributeur Dernière intervention   958
     
    Salut le forum

    Tehani, merci de faire passer ta ficelle en [Résolu] si la solution te convient.

    Mytå
    Merci de donner suite à votre question, nous ne sommes pas des robots...
    Versions installées [MsProject 2003(FR), Excel 2003-2007(FR)]
    0