PPmt (Funktion)

Gibt einen Wert vom Typ Double-Datentyp zurück, der die Kapitalzahlung für einen bestimmten Zeitraum einer Annuität bei regelmäßigen, konstanten Zahlungen und einem konstanten Zinssatz angibt.

Syntax

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

Die Syntax der PPmt-Funktion weist die folgenden Argument auf:

Argument

Beschreibung

rate

Erforderlich. Wert vom Typ Double, der den Zinssatz pro Zeitraum angibt. Wenn Sie beispielsweise einen Kredit für ein Auto zu einem Zinssatz von 10 % p. a. aufnehmen und monatliche Zahlungen vereinbaren, beträgt der Zinssatz pro Zeitraum 0,1/12 oder 0,0083.

per

Erforderlich. Wert vom Typ Integer-Datentyp, der einen Zahlungszeitraum zwischen 1 und nper angibt.

nper

Erforderlich. Wert vom Typ Integer, der die Gesamtanzahl von Zahlungszeiträumen für die Annuität angibt. Wenn Sie beispielsweise für einen Autokredit mit einer Laufzeit von vier Jahren monatliche Zahlungen vereinbaren, beträgt die Summe aller Zahlungszeiträume für den Kredit 4 * 12 (oder 48).

pv

Erforderlich. Wert vom Typ Double, der den aktuellen oder heutigen Wert einer Folge von zukünftigen Ein- oder Auszahlungen angibt. Wenn Sie beispielsweise für den Kauf eines Autos Geld aufnehmen, stellt die Kredithöhe für den Kreditgeber den aktuellen Wert der von Ihnen zu leistenden monatlichen Zahlungen für das Auto dar.

fv

Optional. Wert vom Typ Variant-Datentyp, der den zukünftigen Wert oder das Barguthaben angibt, das Sie sich nach der Schlusszahlung wünschen. Der zukünftige Wert eines Kredits beträgt beispielsweise 0 €, weil dies der Wert des Kredits nach der Schlusszahlung ist. Wenn Sie jedoch für die Ausbildung Ihres Kindes in 18 Jahren 50.000 € ansparen möchten, beträgt der zukünftige Wert 50.000 €. Wenn Sie dieses Argument nicht angeben, wird der Wert 0 angenommen.

Typ

Optional. Wert vom Typ Variant, der angibt, wann Zahlungen fällig sind. Verwenden Sie den Wert 0, wenn Zahlungen am Ende eines Zahlungszeitraums fällig sind, oder verwenden Sie den Wert 1, wenn Zahlungen zu Beginn eines Zeitraums fällig sind. Wenn Sie nichts angeben, wird der Wert 0 angenommen.


Hinweise

Bei einer Annuität handelt es sich um eine Folge konstanter Barzahlungen über einen bestimmten Zeitraum hinweg. Eine Annuität kann ein Kredit (wie z. B. eine Haushypothek) oder eine Kapitalanlage (wie z. B. ein monatlicher Sparplan) sein.

Die Argumentrate und nper müssen mit Zahlungszeiträumen berechnet werden, für die dieselbe Einheit verwendet wird. Wenn rate beispielsweise in Monaten berechnet wird, muss nper ebenfalls in Monaten berechnet werden.

Bei allen Argumenten werden Zahlungsausgänge (z. B. Spareinlagen) durch negative, Zahlungseingänge (z. B. Dividendenauszahlungen) durch positive Zahlen dargestellt.

Beispiel

Hinweis : Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic für Applikationen). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerhilfe in der Dropdownliste neben Suchen, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

In diesem Beispiel wird die PPmt-Funktion verwendet, um zu berechnen, wie viel von einer Zahlung für einen bestimmten Zeitraum Kapitalwert ist, wenn alle Zahlungen denselben Wert aufweisen. Gegeben sind der Zinssatz pro Zeitraum (APR / 12), die Tilgungsperiode, für die der Kapitalanteil errechnet werden soll (Period), die Gesamtanzahl von Zahlungen (TotPmts), der aktuelle Wert oder Kapitalwert des Kredits (PVal), der zukünftige Kreditwert (FVal) sowie eine Zahl, die angibt, ob die Zahlung zu Beginn oder am Ende des Zahlungszeitraums 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
Teilen Facebook Facebook Twitter Twitter E-Mail E-Mail

War diese Information hilfreich?

Sehr gut. Noch anderes Feedback?

Was können wir verbessern?

Vielen Dank für Ihr Feedback!

×