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

XL 2010 Coup de pouce pour format 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 !

TOINE38

XLDnaute Occasionnel
Bonjour a tous,

Pas très expert en la matière, j'aurais besoin d'un petit coup de pouce pour créer un code qui me permettra de mettre tous mes textbox au format "0.00".
J'au un code qui marche bien :
Textbox_1 = Range("J3")
Textbox_1 = Format(Textbox_1.Value, "0.00")

Ayant 18 Textbox, je souhaiterais savoir si il n'y aurais pas un moyen plus simple que de recopier 18 fois
Textbox_x = Format( Tetxbox_x, "0.00")

Merci d'avance

cordialement

toine 38
 
Bonjour Toin,
Perso je ne renomme pas les objets donc exemple ici TextBox1 > TextBox2
il faut faire une boucle (ici 18 est le nombre de textbox)

For k =1 to 18
Controls("TextBox" & k)=Format(Controls("TextBox" & k).Value, "0.00")
Next

Bruno
 
bonsoir Youky

Merci pour ta réponse, c'est un fait que je n'y arrivais pas malgré les essais de boucle que j'essayais de faire.
Ta remarque sur le nom des textbox m'a beaucoup aidé et cela fonctionne à merveille.

Mille merci pour ta réponse.

bonne fin de weekend

toine38
 
- 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

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