PPmt (Funktion)

Gibt einen Double-Wert zurück, der die Tilgung der Annuität für einen bestimmten Zeitraum angibt, basierend auf periodischen, festen Zahlungen und einem festen Zinssatz.

Syntax

PPmt(rate, per,nper,pv [, fv ] [, type ] )

Die Syntax der Funktion PPmt weist die folgenden Argumente auf:

Argument	Beschreibung
Tarif	Erforderlich. Double-Wert, der den Zinssatz pro Zeitraum angibt. Wenn Sie beispielsweise einen Autokredit mit einem Jahreszins von 10 Prozent aufnehmen und monatliche Zahlungen leisten, beträgt der Zinssatz pro Zeitraum 0,1/12 oder 0,0083.
pro	Erforderlich. Ganzzahl, die den Zahlungszeitraum im Bereich von 1 bis Zzr angibt.
Zzr	Erforderlich. Ganzzahl , die die Gesamtzahl der Zahlungsperioden in der Annuität angibt. Wenn Sie beispielsweise monatliche Zahlungen für einen Autokredit mit vierjähriger Laufzeit leisten, hat der Kredit eine Gesamtanzahl von Zahlungszeiträumen von 4 x 12 (oder 48).
PV	Erforderlich. Double-Wert, der den Barwert, also den heutigen Wert, einer Reihe zukünftiger Zahlungen oder Geldeingänge angibt. Wenn Sie beispielsweise einen Kredit für ein Auto aufnehmen, ist die Summe dieses Kredits für den Kreditgeber gleich dem Barwert der monatlichen Zahlungen, die Sie für das Auto leisten.
ZW	Optional. Variant-Wert, der den Endwert (future value) oder Kontostand angibt, der nach der letzten Zahlung erreicht sein soll. Der Endwert eines Kredits ist z. B. 0 Euro, da dies sein Wert nach der letzten Zahlung ist. Wenn Sie jedoch für die Ausbildung Ihrer Kinder 50.000 Euro in 18 Jahren ansparen möchten, entspricht der Endwert 50.000 Euro. Fehlt dieses Argument, wird 0 angenommen.
type	Optional. Variant-Wert, der angibt, wann Zahlungen fällig sind. Verwenden Sie 0, wenn die Zahlungen am Ende des Zahlungszeitraums fällig sind, oder verwenden Sie 1, wenn die Zahlungen am Anfang des Zeitraums fällig sind. Fehlt dieses Argument, wird 0 angenommen.

Hinweise

Eine Annuität ist eine Reihe von konstanten Barzahlungen, die in einem Zeitraum geleistet werden. Eine Annuität kann ein Kredit (z. B. eine Eigenheimhypothek) oder eine Investition (z. B. eine monatliche Spareinlage) sein.

Die Argumente Zinssatz und Zzr müssen anhand von Zahlungszeiträumen berechnet werden, die in denselben Einheiten ausgedrückt werden. Wenn der Satz beispielsweise mit Monaten berechnet wird, muss Zzr auch mit Monaten berechnet werden.

Für alle Argumente gilt, dass Geldbeträge, die ausgezahlt werden (etwa Spareinlagen), durch negative Zahlen und Geldbeträge, die eingenommen werden (etwa Dividenden), durch positive Zahlen dargestellt werden.

Abfragebeispiel

Ausdruck	Ergebnisse
SELECT FinancialSample.*, PPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample;	Gibt alle Felder aus der Tabelle "FinancialSample" zurück, berechnet den zu zahlenden Kapitalbetrag in "pro" (in diesem Beispiel 10) des "LoanAmount" basierend auf "AnnualRate" und "TermInYears" und zeigt die Ergebnisse in Spalte INTPaid an.

VBA-Beispiel

In diesem Beispiel wird die Funktion KKz verwendet, um zu berechnen, wie viel einer Zahlung für eine bestimmte Periode einmalig ist, wenn alle Zahlungen den gleichen Wert haben. Angegeben sind der Zinssatz pro Periode (APR / 12), die Zahlungsperiode, für die der Kapitalanteil gewünscht wird (Period), die Gesamtzahl der Zahlungen (TotPmts), der Barwert oder das Kapital des Darlehens (PVal), der zukünftige Wert des Darlehens (FVal) und eine Zahl, die angibt, ob die Zahlung zu Beginn oder am Ende der Zahlungsperiode fällig ist (PayType).

Dim NL, TB, Fmt, FVal, PVal, APR, TotPmts, PayType, Payment, Msg, MakeChart, Period, P, I
Const ENDPERIOD = 0, BEGINPERIOD = 1    ' When payments are made.
NL = Chr(13) & Chr(10)    ' Define newline.
TB = Chr(9)    ' Define tab.
Fmt = "###,###,##0.00"    ' Define money format.
FVal = 0    ' Usually 0 for a loan.
PVal = InputBox("How much do you want to borrow?")
APR = InputBox("What is the annual percentage rate of your loan?")
If APR > 1 Then APR = APR / 100    ' Ensure proper form.
TotPmts = InputBox("How many monthly payments do you have to make?")
PayType = MsgBox("Do you make payments at the end of month?", vbYesNo)
If PayType = vbNo Then PayType = BEGINPERIOD Else PayType = ENDPERIOD
Payment = Abs(-Pmt(APR / 12, TotPmts, PVal, FVal, PayType))
Msg = "Your monthly payment is " & Format(Payment, Fmt) & ". "
Msg = Msg & "Would you like a breakdown of your principal and "
Msg = Msg & "interest per period?"
MakeChart = MsgBox(Msg, vbYesNo)    ' See if chart is desired.
If MakeChart <> vbNo Then
    If TotPmts > 12 Then MsgBox "Only first year will be shown."
    Msg = "Month  Payment  Principal  Interest" & NL
    For Period = 1 To TotPmts
        If Period > 12 Then Exit For    ' Show only first 12.
        P = PPmt(APR / 12, Period, TotPmts, -PVal, FVal, PayType)
        P = (Int((P + .005) * 100) / 100)    ' Round principal.
        I = Payment - P
        I = (Int((I + .005) * 100) / 100)    ' Round interest.
        Msg = Msg & Period & TB & Format(Payment, Fmt)
        Msg = Msg & TB & Format(P, Fmt) & TB & Format(I, Fmt) & NL
    Next Period
    MsgBox Msg    ' Display amortization table.
End If