Message erreur Userform [Résolu]

Signaler
Messages postés
252
Date d'inscription
vendredi 6 mai 2011
Statut
Membre
Dernière intervention
15 janvier 2021
-
Messages postés
252
Date d'inscription
vendredi 6 mai 2011
Statut
Membre
Dernière intervention
15 janvier 2021
-
Bonjour
Dans ma userform je veux que le nom soit écrit en majuscule, sinon il faudrait un message pour signaler l'erreur
De même pour le numéro de téléphone s'il manque un chiffre par exemple.
Merci à tous

3 réponses

Messages postés
7216
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
19 janvier 2021
601
Messages postés
252
Date d'inscription
vendredi 6 mai 2011
Statut
Membre
Dernière intervention
15 janvier 2021
28
merci pour le lien, mais je ne suis pas assez compétent pour bien analyser et utiliser le document.
dans ma formule ci-dessous qui correspond à entrer le n° de téléphone sans espace, j'aimerais que si par erreur la personnes rentre le n° avec espace, une fenêtre d'erreur s'affiche indiquant que le n° doit être rentré sans espace.
[A2] = TextBox21 'Insère le nom en majuscule dans la colonne A

[Q2] = Val(TextBox13.Value) insère le n° de téléphone sans espace
Ce fichier étant destiné pour une personne du secteur médico social, je ne peux le transmettre

merci, pour votre aide
mchotard
Messages postés
7216
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
19 janvier 2021
601
Dans le lien il y a l'exemple pour les majuscule!

Option Explicit
Private Sub TextBox1_Change()
  Range("A2") = TextBox1.Value
End Sub
'Forcer les majuscules lors de la saisie dans un TextBox.
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
    KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub
Private Sub TextBox2_Change()
Range("Q2") = TextBox2.Value
End Sub
'empecher les espaces
Private Sub TextBox2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii = 32 Then KeyAscii = 0
End Sub






@+ Le Pivert
Messages postés
252
Date d'inscription
vendredi 6 mai 2011
Statut
Membre
Dernière intervention
15 janvier 2021
28
Merci c'est OK cela marche bien. C'est super
Cdlt