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

Microsoft 365 Calcul TEXTBOX dans Userform

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

eric72

XLDnaute Accro
Bonjour,
Je cherche à faire des calculs de Textbox dans un Userform en sachant qu'elles ne sont pas toujours toutes renseignées à chaque fois, malgré cela j'aimerais que le calcul se fasse quand même en tenant compte de celles renseignées, donc j'ai adapté ce code mais ça ne va pas.
Ou est la boulette?
Merci à tous
 

Pièces jointes

d'accords on avance c'est donc l'event du prix accessoire
je le met au change ca match
bon ben je fait le transport vente et après on s'occupe des conditions de calcul dans conditionnement et emballage qui peuvent ne pas tous être remplis et on aura fini les frames
 
Dans CONDITIONNEMENT il peut n'y avoir que de la soie pour un produit, ou bien que de la cordelette, ou un conditionnement dans Combo et cordelette.
Bref toutes les options sont possibles


Idem pour la mousseline le kraft etc...
 
ok
donc pour conditionnement dans ma classe ca ce traduirait par ça
au lieu de
VB:
V = Array(.PrixCdt.Value, .TxtSoie.Value, .TxtCordelette.Value, .TxtEtiquetteCarton.Value, .CoeffCdt.Value)
            critere = V(0) <> "" And V(1) <> "" And V(2) <> "" And V(3) <> "" And V(4) <> ""

Code:
V = Array(.PrixCdt.Value, .TxtSoie.Value, .TxtCordelette.Value, .TxtEtiquetteCarton.Value, .CoeffCdt.Value)
  critere = Val(V(0)) <> 0 Or Val(V(1)) <> 0 Or Val(V(2)) <> 0 Or Val(V(3)) <> 0 And V(4) <> ""
au moins l'entre eux plus le coeff de rempli quoi
c'est ça ??
 
- 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
38
Affichages
906
Réponses
1
Affichages
433
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…