Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

différents format de Textbox

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion news
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
N

news

XLDnaute Impliqué
Bonjour à tous du forum,

J'utilise une textbox avec différent format. Quand n'est pas mis le bon format, il est affiché la Msgbox ("format non valide").

Mais je ne sais pas trop comment y mettre les bons format suivant 😕 :

Dans la TextBox6 si on met une lettre (un format non numérique) renvoie Msgbox
ou si on ne met pas le format (####.##.##-###) renvoie Msgbox

If IsNumeric(TextBox6) Then
TextBox6 = CDbl(TextBox6.Value)
TextBox6 = Format(TextBox6, "####.##.##-###") 'type format (0000.00.00-000), p.ex.:1976.05.20-105
Exit Sub
Else
Msgbox("invalid format")

merci d'avance de vos astuces, lequels m'ont déjà bien aidé d'avancer les Userform,

news
 
Dernière édition:
Trier par date Trier par votes
Re : différents format de Textbox

Bonjour News,
code pour le textbox6
plus besoin de mettre les "." ou "-" cela se fait seul
A+
Code: 
Private Sub TextBox6_Change()
'"####.##.##-###"
If Len(TextBox6) = 4 Then TextBox6 = TextBox1 & "."
If Len(TextBox6) = 7 Then TextBox6 = TextBox1 & "."
If Len(TextBox6) = 10 Then TextBox6 = TextBox1 & "-"
End Sub
Private Sub TextBox6_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If InStr("0123456789", Chr(KeyAscii)) = 0 Then KeyAscii = 0
If Len(TextBox6) = 14 Then KeyAscii = 0
End Sub
 
Vote positif 0 Vote négatif
Re : différents format de Textbox

Bonjour à tous du forum,

merci youky(BJ) pour réponse et l'astuce d'àviter de mettre les "." ou"-"

Re: format(testbox6.Value)
J'ai recherché et trouvé le vba code suivant ( à tester encore ):

If Not Me.TextBox6 Like "####.##.##-###" Then
Msgbox("format invalide")

news
 
Vote positif 0 Vote négatif
Re : différents format de Textbox

ci-joint petit fichier pour pas passer à coté
...pas possible de faire d'erreurs de format et que chiffres accéptés.

Pour les textbox que j'ai pas mis0... utilises.... Like
Trés pratique dans ton cas
A+
 

Pièces jointes

Vote positif 0 Vote négatif
Re : différents format de Textbox

Bonjour à tous du forum,

Re: pas vraiment, comme les exemples ne sont pas adaptées à celles que j'ai besoin,
merci quand même pour les données du fichier "SaisieNum_02, lquel j'avais également trovué auparavant dans la abse de données osu Recherce de ce forum,

J'utilise le code suivant qui résolu le format :

If Not Me.TextBox6 Like "####.##.##-###" Then
Msgbox("format invalide")

news
 
Dernière édition:
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

A
  • Résolu(e)
XL 2010 ajout de textbox
Réponses
2
Affichages
837
Appo1985
A
M
  • Question Question
XL 2016 Instruction Cdate fait planter mon code
Réponses
3
Affichages
1 K
MONADESIGN82
M
  • Question Question
[RESOLUTO]Incrementation la valeur d'un TextBox
Réponses
8
Affichages
982
Ilino
T
  • Question Question
Test sur la somme de 2 textbox avec pourcentage
Réponses
6
Affichages
1 K
thierry.bayard
T
  • Question Question
problème de précision avec valeur collée dans cellule depuis vba
Réponses
8
Affichages
1 K
Roland_M
A
  • Question Question
Erreur 91 Variable objet ou variable de bloc With non définie...
Réponses
3
Affichages
1 K
avekash
A
D
  • Question Question
Controle de textbox (à chaque de valeur) sans bouton
Réponses
3
Affichages
1 K
laetitia90
L
  • Question Question
Perte de focus après saisie de la première lettre
Réponses
12
Affichages
2 K
criscris11
  • Question Question
TextBox activeX en format monétaire
2
Réponses
25
Affichages
5 K
MJ13
N
  • Question Question
format textbox
Réponses
10
Affichages
1 K
news
N
K
  • Question Question
Format date dans textbox
Réponses
3
Affichages
1 K
karinette
K
N
  • Question Question
format de caractères dans textbox
Réponses
8
Affichages
2 K
news
N
N
  • Question Question
textbox format IsNumeric
Réponses
11
Affichages
3 K
mathiouze22
M
N
  • Question Question
textbox format
Réponses
6
Affichages
1 K
news
N
B
  • Question Question
Problème virgule dans textbox
2
Réponses
16
Affichages
7 K
britchouleloup
B
M
  • Question Question
vérifier 4 textbox
Réponses
5
Affichages
1 K
vbacrumble
O
  • Question Question
Textbox et problème de validation
2
Réponses
21
Affichages
5 K
jp14
J
  • Question Question
textbox au format numérique
Réponses
12
Affichages
6 K
Pierwak
P
M
[REF] Wiki Page 8 de MichelXld
Réponses
0
Affichages
39 K
MichelXld
M
M
[REF] Wiki 2 de MichelXld (Ce qui touche aux UserForm)
Réponses
0
Affichages
116 K
MichelXld
M
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…