PPmt függvény

Dupla értéket ad vissza, amely egy adott járadék adott időszakára vonatkozó tőketörlesztést ad vissza időszakos, rögzített kifizetések és rögzített kamatláb alapján.

Szintaxis

PPmt(ráta; per;időszakok_száma;pv [; fv ] [; típus ] )

A PPmt függvény szintaxisa az alábbi argumentumokat foglalja tartalmazza:

Argumentum	Leírás:
Arány	Kötelező. Dupla típusú szám, amely az időszakonkénti kamatlábat határozza meg. Ha például van egy autókölcsöne, amelynek évenkénti kamata 10 százalék, és havonta fizeti vissza, akkor a kamat értéke egy időszakra 0,1/12, vagyis 0,0083.
Per	Kötelező megadni. Egész szám, amely a fizetési időszakot adja meg az 1 és az időszakok_száma közötti tartományban.
időszakok_száma	Kötelező megadni. Egész szám , amely a törlesztési időszakok teljes számát adja meg az annuitásban. Ha például négy évre szóló autókölcsönt vett fel, és havonta fizeti vissza, akkor a kölcsönben 4 * 12 (tehát 48) fizetési időszak van.
Pv	Kötelező megadni. A jövőbeli kifizetések vagy nyugták sorozatának jelenértékének vagy mai értékének dupla megadása. Ha például egy autó megvásárlásához kölcsönkér pénzt, a kölcsön összege a havi autófizetések kölcsönadójának jelenlegi értéke.
Fv	Nem kötelező. Variant típusú érték, amely megadja az utolsó kifizetés utáni jövőbeli értéket vagy egyenleget. Egy kölcsön jövőbeli értéke például 0 Ft, mivel ez az értéke az utolsó kifizetés után. Ha azonban gyermeke taníttatására meg szeretne takarítani 18 év alatt 10 millió forintot, akkor a jövőbeli érték 10 millió forint. Ha nincs megadva, 0-nak feltételezi a rendszer.
típus	Nem kötelező. Variant típusú érték, amely megadja, hogy mikor kell teljesíteni a kifizetéseket. Ha 0 értéket ad meg, a kifizetéseket az időszakok végén, ha 1-et ad meg, akkor azok elején kell teljesíteni. Ha nincs megadva, 0-nak feltételezi a rendszer.

Megjegyzések

Az annuitás fix összegű készpénzfizetések egy sorozata, melyet egy adott időszakban tesz. Az annuitás lehet kölcsön (például jelzálogkölcsön) vagy befektetés (például havi megtakarítás).

A ráta és az időszakok_száma argumentumokat ugyanabban az egységben kifejezett fizetési időszakok használatával kell kiszámítani. Ha például a ráta hónapokkal van kiszámítva, akkor az időszakok_száma is hónapokkal számítható ki.

A kifizetett pénzösszegek (például megtakarításra félretett összegek) negatív számokkal vannak kifejezve minden argumentumban, a kapott készpénzt (például osztalékokat) pozitív számok jelzik.

Példa lekérdezésre

Kifejezés	Eredmény:
SELECT FinancialSample.*, PPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample;	Visszaadja a "FinancialSample" tábla összes mezőjét, kiszámítja a "LoanAmount" "per" (ebben a példában 10) elemében kifizetett tőkeösszeget az "AnnualRate" és a "TermInYears" alapján, és megjeleníti az eredményeket az INTPaid oszlopban.

VBA-példa

Ez a példa a PPmt függvénnyel számítja ki, hogy egy adott időszakra mekkora tőketörlesztés történik, ha az összes kifizetés értéke egyenlő. A megadott érték az időszakonkénti kamatláb (APR / 12), az a törlesztési időszak, amelyre a tőkerészt kívánja használni (Period), a kifizetések teljes száma (TotPmts), a kölcsön jelenértéke vagy tőkerésze (PVal), a hitel jövőbeli értéke (FVal), valamint egy szám, amely jelzi, hogy a törlesztés a törlesztési időszak elején vagy végén esedékes-e (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