Thema Datum  Von Nutzer Rating
Antwort
21.04.2012 11:30:28 dreamLIKE
NotSolved
21.04.2012 13:54:55 Holger
NotSolved
Rot Laufzeit von Annuitätsdarlehen berechnen
 22.04.2012 13:50:32 dreamLIKE
NotSolved
23.04.2012 14:12:11 Holger
NotSolved

Ansicht des Beitrags:
Von:
dreamLIKE		 Datum:
22.04.2012 13:50:32		 Views:
1706		 Rating:
     
Antwort:
  Ja
Thema:
Laufzeit von Annuitätsdarlehen berechnen

HEY danke habs geschafft. Zwar auf ner anderen Art aber passt schon ... =)

 

Sub ABC()

' Variablen dek.

Dim s#, p#, R#, j#, z#, g#, sa#

s = InputBox("Kreditsumme eingeben: ")
p = InputBox("Zinssatz in % eingeben: ")
R = InputBox("Raten eingeben: ")
j = 0
z = 0
sa = s

' Berechnung
p = p / 100

Do While (s > 0 And s - R >= 0)
    z = z + ((s * p) / 12)
    s = (s + ((s * p) / 12)) - R
    j = j + 1
Loop

j = j / 12
g = sa + z

' Ausgabe
MsgBox ("Laufzeit = " & Format(j, "0.00") & vbNewLine & _
"Letzte Rate beträgt " & Format(s, "0.00") & " EUR" & vbNewLine & _
"Die Zinsen betragen " & Format(z, "0.00") & " EUR" & vbNewLine & _
"Gesamtsumme beträgt: " & Format(g, "0.00") & " EUR")


End Sub

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
21.04.2012 11:30:28 dreamLIKE
NotSolved
21.04.2012 13:54:55 Holger
NotSolved
Rot Laufzeit von Annuitätsdarlehen berechnen
 22.04.2012 13:50:32 dreamLIKE
NotSolved
23.04.2012 14:12:11 Holger
NotSolved