Calcul textbox par rapport au label

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 !

la croisée des pains

XLDnaute Occasionnel
Bonjour à tous,

j'aimerais savoir comment calculer les espèces d'après les textbox et les labels.

si je mets 10 dans le (texbox1, label 0,01€) cela doit me donner dans la recette espèces 0,10€.

merci de votre aide

lolo
 

Pièces jointes

Re : Calcul textbox par rapport au label

re,
j'ai trouvé voici ma formule:

TextBox35 = CDbl(TextBox1 * "0,01") + CDbl(TextBox2 * "0,02") + CDbl(TextBox3 * "0,05") + CDbl(TextBox4 * "0,10") + CDbl(TextBox5 * "0,20") + CDbl(TextBox6 * "0,50") + CDbl(TextBox7 * "1,00") + CDbl(TextBox8 * "2,00") + CDbl(TextBox17 * "5,00") + CDbl(TextBox18 * "10,00") + CDbl(TextBox19 * "20,00") + CDbl(TextBox20 * "50,00") + CDbl(TextBox21 * "100,00") + CDbl(TextBox22 * "200,00") + CDbl(TextBox23 * "500,00")


Mais comment si on ne renseigne pas un texbox ne pas avoir un bug dans le calcul

erreur "incompatibilté de type" suite a un texbox vierge....


merci
 
Re : Calcul textbox par rapport au label

Re,

déja, je dirai qu'il faudrait prendre l'habitude de tout de suite nommer tes textbox de manière explicite, c'est une très bonne habitude, surtout pour le débogage par la suite (tb_10cts pour textbox des pièces de 10cents est plus explicite que textbox4)
j'utilise toujours tb_ (textbox), lbl_ pour les labels etc... cela permet en plus de boucler sur toutes les txtbox d'une certaine forme, nature, dénomination ...

sinon
option base 1
dim pieces(20), cpt, total
if Textbox35 = "" then pieces(1) = 0 else pieces(1) = CDbl(TextBox1 * "0,01")
... avec les autres en mettant pieces(2), pieces(3) ...
total = 0
for cpt = 1 to 20
total = total + pieces(cpt)
next cpt
textbox35 = format(total, "0,00")
 
Créer Pavé numérique avec commandbutton

re,

ok j'ai bien renseigné les textbox et tout marche, nickel....
Par contre 2 petits problèmes:

1) comment effacer les textbox avec la touche "CL."
2) Comment me servir du pavé numérique pour remplir les textbox....

merci
lolo
 
Dernière édition:
Re : Calcul textbox par rapport au label

re,

1. il faut soit les traiter un après l'autre ou les mettre dans une boucle, mais là il faut que leur nom respectifs puissent faire l'objet de cette boucle

2. Par contre je ne comprends pas ce que tu veux dire par '2 ou 3 chiffres à suivre'
3. stp joindre ton nouveau fichier si possible
 
Re : Calcul textbox par rapport au label

re,

1. il faut soit les traiter un après l'autre ou les mettre dans une boucle, mais là il faut que leur nom respectifs puissent faire l'objet de cette boucle

2. Par contre je ne comprends pas ce que tu veux dire par '2 ou 3 chiffres à suivre'
3. stp joindre ton nouveau fichier si possible

bonjour le forum,
bonjour mutzik,

voici le fichier .... efface les textbox ...j'ai réussi..

pour les chiffres à suivre je voulais dire si je veux taper par exemple:123
je ne veux pas toujours saisir un seul chiffre dans les textbox..
voilou...

merci de ton aide...

lolo
 

Pièces jointes

Re : Calcul textbox par rapport au label

Re,

j'ai jeté un oeil à ton fichier, mais pas trop le temps, là

petite modif suggérée :
pour ma part, je n'aurais fait qu'une zone de saisie pour les pièces et les billets. Ensuite, en fonction de quelle option est choisie (fond de caisse ou fin de service) tu affectes les valeurs aux bons textbox du dessous. Cela aurai évité pas mal de lignes de code.

Pour la suite, je jeterai un oeil des que possible, sauf si un de mes camarades a un peu de temps d'ici là
 
Re : Calcul textbox par rapport au label

bonjour bertrand,

la saisie des pieces et billets est faite en deux fois

d'abord saisie du fond de caisse avant de partir en tournée de ventes. (option1)
et au retour saisie montant de la caisse des ventes(option2) ce qui permet de verifier les ventes si pas erreur de caisse

(Fond caisse+(Vente et Crédit))-(Saisie de la caisse générale)= Fond Caisse

(Vente et Crédit) est rechercher d'après une feuille..

voila pkoi je dispache les 2 pour eviter les erreurs.....

mais pas de soucis pour changer....
lol
 
Dernière édition:
Re : Calcul textbox par rapport au label

Salut Lolo, Mutzig (de la levure de bière, donc... humour ! )
Et merci Lolo pour tes bons voeux avec la réciproque pour toi,

J'ai fait un petit machin sans prétention sur ton fichier, qui affiche le chiffre obtenu grace à la souris sur les chiffres. Une fois le nombre décidé, un coup sur le "val" du pavé que j'ai ajouté, (en déplaçant l'autre qui marche à merveille) hors de la calculette, et le résultat s'affiche sur l'écran digital très perfectionné. Maintenant, pour mettre ce résultat sur les cases concernées, je ne sais pas.... la honte sur moi.

Faudrait peut être nommer la case (textbox) à remplir, et mettre le résultat dedans, une idée parmi d'autres.

Gros fichier que je t'envoies sur ta messagerie, et je ne supporte pas encore XLD, euh ! je ne suis pas supporter, car très peu présent ces temps-ci.

Un petit fichier rigolo de mon cru en attendant...pour l'idée que ça m'a donnée sur le tien.

Gruick et ses lardons....
 

Pièces jointes

Dernière édition:
Re : Calcul textbox par rapport au label

Bonjour le forum,
bonjour Gruick,

c'est pas mal cette solution....j'aime bien.....plus qu'a trouvé pour transférer sur les textbox correspondant aux pièces et billets. Peut-etre avec le focus pour renvoyer le renvoi....
je vais m'y pencher...
merci de ton aide ...lolo
bonne journée
 
Re : Calcul textbox par rapport au label

Re,
je viens de t'envoyer une solution peu élégante, mais qui marche.
On compte d'abord, on choisit où mettre les sous après.
L'écran est anecdotique, juste pour savoir ce qu'on fait...
A mettre dans le forum si satisfait, je suis coincé par les 48,8 ko.
A toi de voir,
Gruick
 
- 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
8
Affichages
731
Retour