RRÉSZLET függvény

Egy duplaszót ad eredményül, amely megadja az annuitás adott időszakára fizetendő kamatot periodikus, rögzített kifizetések és rögzített kamatláb mellett.

Szintaxis

RRÉSZLET(ráta; időszak; időszakok_száma; jelenérték [; jövőbeli_érték ] [; típus ] )

A RRÉSZLET függvény szintaxisa az alábbi argumentumokat foglalja magában:

Argumentum	Leírás:
Kamatláb	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.
Egy	Kötelező megadni. A törlesztési időszakot duplán megadó érték 1-től az időszakok_száma tartományig
Időszakok_száma	Kötelező megadni. Az annuitásban a fizetési időszakok teljes számát megadó dupla érték 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.
Jelenérték	Kötelező megadni. Egy jövőbeni kifizetések vagy bevételek jelenértékét vagy mai értékét megadó dupla. Ha például autóvásárláshoz vesz fel hitelt, a hitel összege a havonta teljesített autótörlesztések jelenértéke a hitelező számára.
Jövőbeli_érték	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 argumentumot azonos egységben kifejezett fizetési időszakok használatával kell kiszámítani. Ha például a ráta kiszámítása hónapok alapján történik, akkor az időszakok_számát is a hónapok alapján kell kiszámítani.

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éldalekérdezés

Expression (Kifejezés)	Eredmény:
SELECT FinancialSample.*, IPMT([AnnualRate]/12,10,[TermiÉv]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample;	Visszaadja a "PénzügyiMinta" tábla összes mezőjét, kiszámítja a fizetett kamatot a "per"(ebben a példában 10) "LoanAmount" értékben az "AnnualRate" és a "TermInYears" alapján, és megjeleníti az eredményeket az INTPaid oszlopban.

Példa VBA-kódra

Ebben a példában a RRÉSZLET függvénnyel kiszámítható, hogy mekkora összeg vált ki kamatként, ha minden kifizetés egyenlő értékű lesz. Adott az időszakonkénti kamatláb (),APR / 12 a törlesztési időszak, amelyre a kamatrészt igényli (Period), a törlesztések teljes száma (TotPmts), a kölcsön jelenértéke vagy tőkerésze (PVal), a kölcsön jövőbeli értéke (),FVal és egy szám, amely azt jelzi, hogy a törlesztés a törlesztési időszak elején vagy végén esedékes (PayType).

Dim FVal, Fmt, PVal, APR, TotPmts, PayType
Dim Period, IntPmt, TotInt, Msg
Const ENDPERIOD = 0, BEGINPERIOD = 1
FVal = 0    ' Usually 0 for a loan.
Fmt = "###,###,##0.00"    ' Define money format.
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?")
PayType = MsgBox("Do you make payments at " & _
    "the end of the month?", vbYesNo)
If PayType = vbNo Then 
     PayType = BEGINPERIOD 
     Else PayType = ENDPERIOD
End If
For Period = 1 To TotPmts    ' Total all interest.
    IntPmt = IPmt(APR / 12, Period, TotPmts, _
             -PVal, FVal, PayType)
    TotInt = TotInt + IntPmt
Next Period
Msg = "You'll pay a total of " & Format(TotInt, Fmt) 
Msg = Msg & " in interest for this loan."
MsgBox Msg    ' Display results.