Xl/Vba nbre caractere restant dans label ??
Résolu
7808622H
Messages postés
292
Date d'inscription
Statut
Membre
Dernière intervention
-
7808622H Messages postés 292 Date d'inscription Statut Membre Dernière intervention -
7808622H Messages postés 292 Date d'inscription Statut Membre Dernière intervention -
Bonjour
une petite question sur laquelle je seche :
J'ai un userform1 dans lequel un textbox (TB_Descr) ne doit contenir que 30 caractères maximum
J'ai placé un label a coté (label19) et je voudrais que celui ci indique "OK" ou "PAS OK" selon le nombre de caractères saisi
Voila alors j'ai vaguement trouvé un truc pour limiter le nombre de caractères mais ça marche pas
Private Sub TB_Descr_Initialize()
TB_Descr.MaxLength = 30
End Sub
....du coup j'ai pensé au label qui alerte, mais je ne trouve pas non plus comment faire
Sinon le top serait de voir le nombre de caractères restant dans le label, lorsque l'on saisi dans le Textbox
Voila si quelqu'un peu m'aider ca serait super sympa
Bonne soirée
( attention version d'excel : 2002 , cela implique que tout les codes Vba ne marchent pas forcément
CED
une petite question sur laquelle je seche :
J'ai un userform1 dans lequel un textbox (TB_Descr) ne doit contenir que 30 caractères maximum
J'ai placé un label a coté (label19) et je voudrais que celui ci indique "OK" ou "PAS OK" selon le nombre de caractères saisi
Voila alors j'ai vaguement trouvé un truc pour limiter le nombre de caractères mais ça marche pas
Private Sub TB_Descr_Initialize()
TB_Descr.MaxLength = 30
End Sub
....du coup j'ai pensé au label qui alerte, mais je ne trouve pas non plus comment faire
Sinon le top serait de voir le nombre de caractères restant dans le label, lorsque l'on saisi dans le Textbox
Voila si quelqu'un peu m'aider ca serait super sympa
Bonne soirée
( attention version d'excel : 2002 , cela implique que tout les codes Vba ne marchent pas forcément
CED
A voir également:
- Xl/Vba nbre caractere restant dans label ??
- Caractère ascii - Guide
- Caractère spéciaux - Guide
- Caractere speciaux - Guide
- Caractere vide - Guide
- Caractere speciaux mac - Guide
4 réponses
Bonjour,
Normalement pas de raison que MaxLength ne fonctionne pas.
Un exemple (sur 2003) avec MaxLength =30 et affichage du reste :
https://www.cjoint.com/?BLBwuTixgwz
eric
Normalement pas de raison que MaxLength ne fonctionne pas.
Un exemple (sur 2003) avec MaxLength =30 et affichage du reste :
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
Label1 = "reste : " & 30 - Len(TextBox1)
End Sub
https://www.cjoint.com/?BLBwuTixgwz
eric
Génial
Merci Eric, ca marche nickel ( bon j ai juste mis a 29 caracteres sinon j'avais un décallage d'1)
Bonne journée
Merci Eric, ca marche nickel ( bon j ai juste mis a 29 caracteres sinon j'avais un décallage d'1)
Bonne journée
Bonjour Eric
Je me suis apercu d'un petit problème ( bon j'espère que tu verras le message malgrès le RESOLU) concernant les labels qui indiquent le nombre de caractere retant ' dans le deuxieme onglet du formulaire
En effet si tu tentes de saisir une quinzaine de caractères, et qu'en plein milieu tu en sélectionnes quelques uns en les supprimant, le label n'est plus cohérent, parfois il met + de caractères restant que prévu, parfois moins
Y a t'il une solution pour que le label s'actualise a chaque saisie ou modif de saisie ?
https://www.cjoint.com/?0AjviwLLHAA
C'est vraiment le seul dernier petit bug que j'ai recensé ( bon je n'ai pas la bonne version du fichier ici mais le probleme est identique, les dernières modifs ne sont qu'au niveau de formules
Je te remercie d'avance
Passe une bonne soirée
Je me suis apercu d'un petit problème ( bon j'espère que tu verras le message malgrès le RESOLU) concernant les labels qui indiquent le nombre de caractere retant ' dans le deuxieme onglet du formulaire
En effet si tu tentes de saisir une quinzaine de caractères, et qu'en plein milieu tu en sélectionnes quelques uns en les supprimant, le label n'est plus cohérent, parfois il met + de caractères restant que prévu, parfois moins
Y a t'il une solution pour que le label s'actualise a chaque saisie ou modif de saisie ?
https://www.cjoint.com/?0AjviwLLHAA
C'est vraiment le seul dernier petit bug que j'ai recensé ( bon je n'ai pas la bonne version du fichier ici mais le probleme est identique, les dernières modifs ne sont qu'au niveau de formules
Je te remercie d'avance
Passe une bonne soirée