IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Interdire la saisie de caractères accentuées et/ou spéciaux dans une textbox


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Octobre 2010
    Messages
    338
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations forums :
    Inscription : Octobre 2010
    Messages : 338
    Par défaut Interdire la saisie de caractères accentuées et/ou spéciaux dans une textbox
    Bonjour à tous,

    J'aimerais savoir comment interdire la saisie de certains caractères (é, è, à, ê, â, ô, î, û, ç, @ ...) et de chiffres dans une textbox ?

    (en fait je veux que les seuls caractères : a -> z (majuscule et minuscule) et . ; soient autorisés)

    Merci d'avance pour votre aide

    Bonne journée

    Cordialement

    Vincent

  2. #2
    Expert confirmé Avatar de jfontaine
    Homme Profil pro
    Contrôleur de Gestion
    Inscrit en
    Juin 2006
    Messages
    4 756
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 51
    Localisation : France, Sarthe (Pays de la Loire)

    Informations professionnelles :
    Activité : Contrôleur de Gestion

    Informations forums :
    Inscription : Juin 2006
    Messages : 4 756
    Par défaut
    Bonjour,

    Cela se passe dans l'evenement Keypress de la Texbox.
    Tu bloques les caractères avec les codes ASCII qui ne te conviennent pas. (ex : pour creer une zone de texte avec uniquement du numerique)

    Ce code fait ce que tu souhaites
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
     
    Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
     
     
    Select Case KeyAscii
     
        Case 97 To 122
            ' Caracteres alpha min
     
        Case 65 To 90
            'Caracteres alpha Maj
     
        Case 8
            'Retour Chariot
     
        Case Else
     
            KeyAscii = 0
     
    End Select
     
     
    End Sub

  3. #3
    Membre éclairé
    Homme Profil pro
    Inscrit en
    Octobre 2010
    Messages
    338
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations forums :
    Inscription : Octobre 2010
    Messages : 338
    Par défaut
    Impeccable,

    Merci beaucoup et bonne journée

    Vincent

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [Débutant] Empêcher la saisie de caractère spéciaux dans une textbox
    Par jyves47 dans le forum ASP.NET
    Réponses: 2
    Dernier message: 05/02/2014, 20h00
  2. Interdire la saisie des caractères
    Par ahmedpa dans le forum JSF
    Réponses: 4
    Dernier message: 26/12/2012, 16h09
  3. [XL-2007] Interdire la saisie de caractères alphabétiques
    Par maxval18 dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 26/04/2012, 07h44
  4. Empecher la saisie de caractère accentué
    Par mcorvaisier dans le forum IHM
    Réponses: 10
    Dernier message: 23/04/2009, 09h54
  5. Caractères spéciaux dans une boite de dialogue
    Par Rafiki dans le forum Général JavaScript
    Réponses: 22
    Dernier message: 09/03/2006, 14h05

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo