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

Userform, valeur par défaut textbox

  • Initiateur de la discussion Initiateur de la discussion guiyom
  • 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 !

guiyom

XLDnaute Junior
Bonjour,

Je sollicite votre afin de m'éclairer sur un problème que je rencontre actuellement sur les textbox d'un Userform.

J'utilise une formule qui multiplie le montant saisie dans les textbox par un nombre prédéfinie :

VB:
 Me.TextBox6 = Val(Replace(Me.TextBox1 * 100, ",", ".")) + Val(Replace(Me.TextBox2 * 200, ",", ".")) + Val(Replace(Me.TextBox3 * 300, ",", ".")) + Val(Replace(Me.TextBox4 * 400, ",", ".")) + Val(Replace(Me.TextBox5 * 500, ",", "."))

La formule fonctionne parfaitement à condition que la valeur par défaut des textbox soit défini au préalable à 0.

J'aimerais faire disparaître les "0" présent par défaut dans chaque textbox afin de gagner en visibilité et par soucis pratique.

Je joint à mon post un fichier illustrant le problème.

Cordialement
 

Pièces jointes

Dernière édition:
Bonsoir @guiyom ,

Essayez :
Sub Calcul() Me.TextBox6 = 100 * Val(Replace(Me.TextBox1, ",", ".")) + 200 * Val(Replace(Me.TextBox2, ",", ".")) + 300 * Val(Replace(Me.TextBox3, ",", ".")) + 400 * Val(Replace(Me.TextBox4, ",", ".")) + 500 * Val(Replace(Me.TextBox5, ",", ".")) End Sub
 
Dernière édition:
Bonsoir,

Merci pour la rapidité de réponse et de résolution du problème, j'ai honte de ne pas y avoir pensé....
J'étais en trin de bidouiller avec des IF actuellement.

Encore merci et bonne soirée.

Cordialement
 
- 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
7
Affichages
1 K
Réponses
10
Affichages
732
Réponses
4
Affichages
727
H
Réponses
19
Affichages
6 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…