A l'aide d'un userform calcul du beverage cost

ianis

XLDnaute Junior
Bonsoir à tous,

Je souhaiterais avoir votre aide afin de calculer à l'aide d'un userform le BEVERAGE COST en utilisant la formule suivante :

1,25 euros / 13,38 euros HT * 100 = 9,34 %

PRIX D'ACHAT HT BEVERAGE = 1,25 EUROS
PRIX DE VENTE TTC BEVERAGE = 16,00 EUROS
LORSQUE JE SAISIRAI LE PRIX DE VENTE TTC, IL S'AFFICHERA AUTOMATIQUEMENT LE MONTANT HT. (16,00 EUROS /1,196 = 13,38 euros HT) CAR POUR CALCULER LE BEVERAGE COST IL FAUT PRELEVER LA TVA

Ci-Joint, fichier pour exemple.

Merci sincèrement pour votre aide.

Cordialement.

Ianis



FOR
 

Pièces jointes

  • TEST_ratio.xls
    33 KB · Affichages: 106
  • TEST_ratio.xls
    33 KB · Affichages: 105
  • TEST_ratio.xls
    33 KB · Affichages: 87

ianis

XLDnaute Junior
Re : A l'aide d'un userform calcul du beverage cost

Bonjour à tous,

Merci bcq Laetitia90 c'est tout à fait ça. Encore merci.

Cependant, après essai, J'ai rencontré un petit souci lorque je veux mettre un montant avec une virgule il me fait pas le calcul car il considère la virgule comme un point et idem pour le montant TTC problème avec la virgule il considère que c'est un point.

Merci pour votre réponse.

Cordialement.

Ianis
 

laetitia90

XLDnaute Barbatruc
Re : A l'aide d'un userform calcul du beverage cost

re ,:):)
si tu veus faire le calcul avec virgule tu supprime ces 2 lignes dans le code

Code:
If KeyAscii = Asc(",") Then KeyAscii = Asc(".")

le calcul se fera avec , ou . ou mixte des 2

autrement si tu veus exprimer le resultat avec virgule "9,34 %"

tu changes cette ligne

Code:
T4 = Format(T1 / T3, "0.00 %")

par celle la

Code:
T4 = Replace(Format(T1 / T3, "0.00 %"), ".", ",")

meme principe si tu changer T3 utiliser Replace
 

Discussions similaires

Statistiques des forums

Discussions
312 489
Messages
2 088 870
Membres
103 980
dernier inscrit
grandmasterflash38