Befehlsreferenz - Mathematik: PPmt-Funktion
VB-Versionen: VB4 | VB5 | VB6
Beschreibung:
Die PPmt-Funktion gibt den Kapitalanteil einer Auszahlung für einen bestimmten Zeitraum einer Annuität zurück. Der Rückgabewert ist vom Typ Double.
Syntax:
PPmt (rate, per, nper, pv, [fv, [type]] )
Parameter:
rate | (Double) Gibt den Zinssatz pro Zeitraum an. Nehmen Sie z.B. einen Kredit für mit einem Jahreszins von 8 Prozent auf und vereinbaren monatliche Zahlungen, beträgt der Zinssatz pro Zeitraum 0,08 dividiert durch 12 oder 0,00666. |
per | (Integer) Gibt den Zahlungszeitraum an (1 bis nper) |
nper | (Integer) Gibt die Gesamtanzahl der Zahlungszeiträume für die Annuität an. Beträgt die Laufzeit eines Kredits z.B. 3 Jahre, muß für pmt 36 (3 x 12 Monat) angegeben werden. |
pv | (Double) Barwert Wenn Sie beispielsweise Geld für einen Autokauf aufnehmen, stellt die Kredithöhe für den Kreditgeber den Barwert der von Ihnen zu leistenden monatlichen Zahlungen dar. |
fv | Optional. (Variant) Gibt den Endwert oder Kontostand an, der erreicht sein soll, wenn die letzte Zahlung erfolgte. |
type | Optional. (Variant) Gibt an, wann Zahlungen fällig sind. Bei 0 (Voreinstellung) sind die Zahlungen am Ende eines Zahlungszeitraums fällig, bei 1 zu Beginn des Zahlungszeitraums. |
Unter einer Annuität versteht man eine Folge konstanter Barzahlungen über einen bestimmten Zeitraum. Eine Annuität kann ein Kredit sein (z.B. eine Haushypothek) oder eine Investition (z.B. eine regelmäßige Spareinlage).
Die Angaben für rate und nper müssen in derselben Maßeinheit erfolgen.
In der Parameterliste werden Zahlungsausgänge (z.B. Spareinlagen) durch negative und Zahlungseingänge (z.B. Dividendenauszahlungen) durch positive Zahlen dargestellt.
Beispiel:
' Berechnen der monatlichen Belastung für einen Kredit dblKredit = 25000 'Höhe des Kredits dblZinssatz = 8 / 100 'Zinssatz jährlich dblLaufzeit = 60 ' gewünschte Laufzeit (60 Monate = 5 Jahre) varTermin = 1 ' Zahlungen am Monatsanfang dblMonatsrate = Pmt(dblZinssatz / 12, dblLaufzeit, -dblKredit, 0, varTermin) ' Zur Info: mtl. Belastung beträgt 503,56 bei insgesamt 30.558,60 DM MsgBox "Monatliche Belastung: " & Format(dblMonatszahlung, "###.###.##0,00") & _ vbCrLf & "Insgesamt gezahlt wurde dann: " & _ Format$(dblLaufzeit * dblMonatsrate, "###.###.##0,00") & " gezahlt." ' Aufschlüsselung Kapital- und Zinsanteil für das 1. Jahr For z = 1 To 12 kAnteil = PPmt(dblZinssatz / 12, z, dblLaufzeit, -dblKredit, 0, varTermin) kAnteil = (Int((kAnteil + 0.005) * 100) / 100) ' Kapitalanteil runden. zAnteil = dblMonatsrate - kAnteil zAnteil = (Int((zAnteil + 0.005) * 100) / 100) ' Zinsen runden. Debug.Print i, Format$(Monatsrate, "###.##0,00"), _ Format$(kAnteil, "###.##0,00"), Format$(zAnteil, "###.##0,00") Next z