Formule excel 2003

Résolu/Fermé
DJAMALOS Messages postés 332 Date d'inscription vendredi 9 mai 2008 Statut Membre Dernière intervention 23 mars 2024 - 5 juin 2008 à 00:12
sapiens-sapiens Messages postés 1860 Date d'inscription mardi 25 mars 2008 Statut Membre Dernière intervention 27 décembre 2016 - 30 nov. 2008 à 13:44
Bonjour,
Voila pouvez m'aider je veux avoir une formule dans exel 2003 pour pouvoir trouver automatiquement une somme H.T. et la T.V.A en tappant la somme T.T.C (je m'explique exemple Somme T.T.C 16000 (je veux son H/T dans une cellule et la T.V.A dans une autre cellule automatique merci et bravo)
A voir également:

4 réponses

votre psychiatre Messages postés 1470 Date d'inscription lundi 28 janvier 2008 Statut Membre Dernière intervention 19 avril 2024 252
5 juin 2008 à 00:14
tout depend de ton taus de tva par exemple si tu es en 19.6 tu prend ton ttc et tu le divise par 1.196 ce qui te donne le HT apres il suffit de faire une soustraction ou de refaire une autre formaule
0
DJAMALOS Messages postés 332 Date d'inscription vendredi 9 mai 2008 Statut Membre Dernière intervention 23 mars 2024 3
5 juin 2008 à 00:24
merci psych
je ne cherche pas cette formule (ce que je cherche c'est comment programmer la formule pour a chaque fois en tappant sur une Somme en T.T.C, je veux ke la Somme H.T auto et T.V.A 17% auto (H.T et T.V.A) insertion automatique
0
sapiens-sapiens Messages postés 1860 Date d'inscription mardi 25 mars 2008 Statut Membre Dernière intervention 27 décembre 2016 26
5 juin 2008 à 01:08
salut,

bon voilà un exemple de probramme VB Excel pour ce que tu veux réaliser (avec un message de controle en plus):

Sub tva()
Dim q As Single, pu As Single, ttva As Single, mht As Single, mtva As Single
Dim mttc As Single, i As Integer, r As Integer
i = 2
q = Sheets("feuil1").Cells(i, 1)
pu = Sheets("feuil1").Cells(i, 2)
ttva = Sheets("feuil1").Cells(i, 3)
mht = q * pu
mtva = ttva * mht
mttc = mht + mt
Sheets("feuil1").Cells(i, 4) = mht
Sheets("feuil1").Cells(i, 5) = mtva
Sheets("feuil1").Cells(i, 6) = mttc
r = MsgBox("Voulez-vous continuer?", vbYesNo, "Message de contrôle")
If r = 6 Then
Do
i = i + 1
Loop Until Sheets("feuil1").Cells(i, 1) = ""
Else
MsgBox "vous avez choisi non, le programme sera arrêté"
End If


End Sub




voilà tu n'as qu'à ajuster selon l'emplacement de tes cellules; cells (i,*)

espèrant que tu sais comment faire pour créer le bouton "calculer" et tout le reste.
0
DJAMALOS Messages postés 332 Date d'inscription vendredi 9 mai 2008 Statut Membre Dernière intervention 23 mars 2024 3
5 juin 2008 à 01:56
Merci et Mille Merci Champion
le probeleme est la ! je ne sais comment faire pour créer le bouton "calculer" et tout le reste. j'attends votre aide, et merci pour tous
djamalos
0
sapiens-sapiens Messages postés 1860 Date d'inscription mardi 25 mars 2008 Statut Membre Dernière intervention 27 décembre 2016 26 > DJAMALOS Messages postés 332 Date d'inscription vendredi 9 mai 2008 Statut Membre Dernière intervention 23 mars 2024
5 juin 2008 à 11:26
bon laisse moi ton adresse mail en MP, je vais t'envoyer quelques trucs en P-J qui peuvent te servir dés que j'ai un peu de temps pour ça.

0
sapiens-sapiens Messages postés 1860 Date d'inscription mardi 25 mars 2008 Statut Membre Dernière intervention 27 décembre 2016 26 > sapiens-sapiens Messages postés 1860 Date d'inscription mardi 25 mars 2008 Statut Membre Dernière intervention 27 décembre 2016
8 juin 2008 à 01:40
C'est bon je t'ai envoyé les truc, j'éspère que ça t'aidera
0
donner-moi télécharger exel et word
0
sapiens-sapiens Messages postés 1860 Date d'inscription mardi 25 mars 2008 Statut Membre Dernière intervention 27 décembre 2016 26 > farid
30 nov. 2008 à 13:44
Hein?!
0
DJAMALOS Messages postés 332 Date d'inscription vendredi 9 mai 2008 Statut Membre Dernière intervention 23 mars 2024 3
6 juin 2008 à 23:57
SVP, je veux une formule pour une somme par exemple de 3540,00 droit de timbre 1% (resultat dans la cellule avec chiffre rond merci pour les champions d'excel

BRAVO POUR LA REPONSE
0
chtilou Messages postés 1664 Date d'inscription mardi 22 janvier 2008 Statut Membre Dernière intervention 30 avril 2012 522
7 juin 2008 à 21:22
Re,

Voir.
0