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

% dans une textbox

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 !

Tungstene

XLDnaute Occasionnel
Bonjour,

J'ai une textbox dans laquelle j'inscris un %
J'utilise le code suivant :

TextBox = Format(TextBox.Value, '0%')

En revanche le format défini multiplie par 100 ce que je rentre dans ma textbox.
Autrement dit pour afficher 50% je dois rentrer 0.5 qui x100 = 50%.

Etant donnée que j'aurai que des % sans chiffres après la virgule, n'est il pas possible d'avoir quelque choses qui me transforme le chiffre que je mets en % sans multiplier par 100.

Soit si je rentre 50 cela doit m'afficher 50% et bien prendre en compte que cela correspond à 50 % car je m'en sert dans un calcul ensuite.

Merci.
 
Bonjour Tungstene, bonjour le forum,

Pourquoi ne pas tout simplement le faire dans ton affectation :

TextBox = Format(TextBox.Value/100, '0%')

Cela répondrait à ta demande pour l'affichage et pour les calculs ultérieurs...

Amicalement
Charly
 
Bonjour tungstène, charly

J'aurais fait la meme réponse que charly.

Par contre ce code va te transformer ta donnée en string, il faut donc que tu la change en numerique pour faire tes calculs: Val(TextBox)

salut
 
Re Tungstene et Hervé et tous les autres 😉

La conversion est naturellement indispensable, comme le dit Hervé, mais pour le problème d'affichage de valeur, je viens d'essayer et cela fonctionne très bien :

Private Sub TextBox1_AfterUpdate()
Me.TextBox1.Value = Format(Me.TextBox1.Value / 100, '0%')
End Sub

Cela donne le résultat que tu souhaitais au niveau de l'affichage du moins...

Charly
 
bonsoir a tous !!

pour passer en numerique je fais
Me.TextBox1.Value = Format(Me.TextBox1.Value / 100, '0%')*1

pas accademique mais efficace

bonne soirée
EetF
 
- 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

Réponses
35
Affichages
2 K
Réponses
40
Affichages
5 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…