Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : emprunt banquaire [ Archives Visual Basic / J'AI BESOIN D'AIDE !!!! :) ] (geoff27)

jeudi 15 décembre 2005 à 23:46:34 | emprunt banquaire

geoff27

bonjour,

Je voudrai savoir quel est la formule à appliquer pour réaliser la programation suivante:

Je dois créez un bouton "calcul" dans un doc exel qui affiche le nombre d'années nécessaires au remboursement d'un emprunt à taux d'intérêt fixe (donné en pourcentage) et dont le remboursement annuel est fixe également.
Exemple:
Le programme doit calculer automatiquement anné par anné le montant emprunté, l'intérêt et le reste dû.
Il doit commencer par lire dans la feuille Excel le montant initial emprunté, le taux d'intérêt et le versement annuel de remboursement.

Je dois utiliser dans ma macro Excel les variables suivantes:

Dim annee As Integer
Dim montant As Currency
Dim taux As single
Dim versement As Currency
Dim interet As Currency
Dim reste As Currency

Et initialiser montant, taux et versement à partir des cellules correspondantes de ma feuille Excel.

montant=cells(2,2)
taux=(2,3)
versement=cells(2,4)

Je devrai utiliser une boucle tant que.
While montant>0
...
Wend

Je suis débutant et remercie vivement les personnes qui pouront me consacrer de leur temps et de leur savoir.
cordialement







vendredi 16 décembre 2005 à 08:56:29 | Re : emprunt banquaire

jpleroisse

Réponse acceptée !
Bonjour,

Pour l'exemple ,j'ai mis 120000 en Cells(2,2), 12.5% en Cells(2,3) et 2000 en cells(2,4). En Cells(2,6) j'ai le nombre de mois à rembourser (95).

Sub Remboursement()
Dim Fval, Pval, APR, Payement, ParType, TotPmts
Const ENDPERIOD = 0, GEGINPERIOD = 1
Pval = Cells(2, 2).Value 'Somme empruntée
APR = Cells(2, 3).Value  'Taux d'intérêt
If APR > 1 Then APR = APR / 100 'Convertit au format approprié
Payement = Cells(2, 4).Value 'Montant du remboursement
ParType = ENDPERIOD 'Remboursement début de mois
TotPmts = NPer(APR / 12, -Payement, Pval, Fval, ParType)
If Int(TotPmts) <> TotPmts Then TotPmts = Int(TotPmts) + 1
'Nombre de mois pour rembourser
Cells(2, 6).Value = TotPmts
End Sub

jpleroisse

Si une réponse vous convient, cliquez réponse Acceptée.


vendredi 16 décembre 2005 à 10:05:06 | Re : emprunt banquaire

geoff27

Merci d'avoir répondu aussi rapidement à ma question, je vais vite essayer ça!
Cordialement



vendredi 16 décembre 2005 à 17:45:21 | Re : emprunt banquaire

geoff27


Merci cela fonctionne trés bien!

Mais sans vouloir trop en demander j'aimerai savoir si il serai possible d'afficher année aprés année les opérations:
 exemple
 Emprunt de 1000 euros, intéret de 5%, Remboursement annuel et fixe de 200 euros.

il faudrai que le tableau excel aprés avoir rentrer des valeurs et avoir appuyer sur un bouton "calcul" affiche quelque chose comme ça.

ANNEE                 MONTANT EMPRUNTE            INTERET            REMBOURSEMENT               RESTANT DU
     
1                                    1000.00                                  50.00                                200                                      850.00
      2                                      850                                       42.50                                200                                      692.50
      3                                      692.50                                  34.63                                200                                      527.13
      4                                      527.13                                  26.36                                200                                      353.48
      5                                      353.48                                  17.67                                200                                      171.16
      6                                      171.16                                    8.56                                179.71                                      0
  

Je remercie par avance les personnes qui pourront éventuellement m'apporté une solution.
cordialement






Cette discussion est classé dans : taux, montant, currency, emprunt, versement


Répondre à ce message

Sujets en rapport avec ce message

fonction Sub [ par coucou ] J'ai un travail dans lequel je dois calculer le taux de change (je rentre le montant et une devise et je la veux dans une autre devise.Et mon résultat Mise a jour d'un formulaire, un refresh en qq sorte [ par Krasba ] Voila g une variable globale declaré ds un module a coté, il s'agit d'un taux de monnaie.Sur un formulaire ce taux est affiché et g mis un bouton qui commment créer un tableau stockant des données [ par brecarte ] Bonjour à toutes et tous, Je suis novice en vb, je dois créer un programme autonome dans lequel je dois stocker des données puis les exporter au forma Fontion PMT( fonction financiere) pour ceux qui connaisse le credit. Merci de votre aide [ par nono ] La fonction ou méthode Pmt retourne le versement pour une annuité en se basant sur des versements périodiques et un taux d'intérêt constants. Pmt(taux taux de transfert du modem [ par PBDLpc13 ] bonjour, je voudrais savoir comment faire apparaire le taux de transfert du modem lors qu'il est connécté à internet.il n'y a aucune source avec cette Donnée émise et recu par un modem [ par Robinwood01 ] J'aimerais afficher dans deux labels le taux de download et le taux d'upload. Merci de m'aider j'ai chercher vraiment partout.Tester mon programme d'e ALGO pour les bons [ par bguihal ] voila mon probleme. j'ai un tableau (environ 400 elements ayant toutes un prix), j'ai un montant. je voudrais trouver la somme des prix qui se rapproc condition en vba et formulaire [ par fanny14 ] Salut, J'ai un petit problème: j'ai un champs "taux" qui dépend des champs "nb_enfants" et "nb_enf_crèche". Je voudrai que le champ "taux" s'inscrive stoker le resultat d'une requete SQL dans une variable Currency [ par agnescat ] Bonjour, je souhaiterais savoir s'il est possible en VBA de stocker le resultat d'une requete sql dans une variable currency, et comment faire! Mer Etat avec Access [ par yaya31 ] hello tout le mondeVoila j ai un etat, c est une factureDans cette facture, j ai donc une sous etat ou il y a les articles et le montant.Mon boss voud


Nos sponsors

Sondage...

CalendriCode

Décembre 2008
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,452 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.