Rate függvény

Hatókör
Microsoft 365-höz készült Access Access 2024 Access 2021 Access 2019 Access 2016

Egy duplaszót ad eredményül, amely megadja az annuitás időszakonkénti kamatlábát.

Szintaxis

Ráta(időszakok_száma; részlet;jelenérték [; jövőbeli_érték ] [; típus] [; típus ] [; becslés] )

A RÁTA függvény szintaxisa az alábbi argumentumokat foglalja magában:

Argumentum Leírás:
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.
részlet Kötelező. Dupla típusú szám, amely az időszakokban teljesítendő kifizetéseket adja meg. A kifizetések tartalmazzák a tőkét és a kamatot, amely nem változik az annuitás során.
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, amely a kifizetések esedékességét jelző számot adja meg. 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.
becslés Nem kötelező. A becslés szerint visszaadott értéket megadó variant. Ha nincs megadva, akkor a becsült érték 0,1 (10 százalék).

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 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.

A ráta kiszámítása iterációval történik. A becslés értékétől indulva a Ráta mindaddig ismétli a számítást, míg az eredmény 0,00001 százalékosnál pontosabb nem lesz. Ha a Ráta 20 lépés után sem talál eredményt, sikertelen lesz. Ha a becslése 10%, a ráta pedig sikertelen, próbálkozzon másik becslés értékkel.

Példalekérdezés

Expression (Kifejezés) Eredmény:
SELECT FinancialSample.*, (Rate([TermiÉv]*12,-[MonthlyRePayment],[LoanAmount],0,0,0.1)*12) AS Kamatláb FROM FinancialSample; Visszaadja a "PénzügyiMinta" tábla összes mezőjét és a "Kamatláb" éves "Kamatláb" értékét a "FutamidőÉvben", a "Havi törlesztés" és a "LoanAmount" értékek alapján, és megjeleníti az eredményeket a Kamatláb oszlopban.

VBA-példa

Megjegyzés

A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.

Ebben a példában a Ráta függvénnyel kiszámítjuk egy hitel kamatlábát, figyelembe véve a törlesztőrészletek teljes számát (TotPmts), a törlesztőrészlet összegét (),Payment a kölcsön jelenértékét vagy tőkéjét (PVal), a kölcsön jövőbeli értékét (FVal), egy szám, amely azt jelzi, hogy a törlesztés a fizetési időszak elején vagy végén esedékes (),PayType és a várható kamatláb közelítő értéke (Guess).

Dim Fmt, FVal, Guess, PVal
Dim Payment, TotPmts, PayType, APR
' When payments are made.
Const ENDPERIOD = 0, BEGINPERIOD = 1    
Fmt = "##0.00"    ' Define percentage format.
FVal = 0    ' Usually 0 for a loan.
Guess = .1    ' Guess of 10 percent.
PVal = InputBox("How much did you borrow?")
Payment = InputBox("What's your monthly payment?")
TotPmts = InputBox("How many monthly payments do " & _
          "you have to make?")
PayType = MsgBox("Do you make payments at the end " & _
          "of the month?", vbYesNo)
If PayType = vbNo Then 
    PayType = BEGINPERIOD 
    Else PayType = ENDPERIOD
End If
APR = (Rate(TotPmts, -Payment, PVal, _
      FVal, PayType, Guess) * 12) * 100
MsgBox "Your interest rate is " & _
    Format(CInt(APR), Fmt) & " percent."