Funktsioon Rate

Rakenduskoht
Microsoft 365 rakendus Access Access 2024 Access 2021 Access 2019 Access 2016

Tagastab topelttäpsusega arvu, mis näitab annuiteedi intressimäära perioodi kohta.

Süntaks

Rate(per_arv, pmt,prg [, tul_väärt ] [, tüüp ] [, hinnang ] )

Funktsiooni Rate süntaksil on järgmised argumendid.

Argument Kirjeldus
per_arv Nõutav. Topelttäpsusega arv, mis määratleb annuiteedi makseperioodide koguarvu. Näiteks kui teete nelja-aastase autoostulaenu korral igakuiseid makseid, on teie laenul kokku 4 × 12 (ehk 48) makseperioodi.
makse Nõutav. Igal perioodil tehtavat makset täpsustav kahekordne. Maksed koosnevad tavaliselt põhiosast ja intressist, mis annuiteedi jooksul ei muutu.
pv Nõutav. Topelttäpsusega arv, mis näitab edaspidiste maksete või laekumiste sarja praegust väärtust ehk tänast väärtust. Näiteks kui laenate auto ostmiseks raha, on laenusumma laenaja jaoks teie tehtavate igakuiste automaksete praegune väärtus.
tul_väärt Valikuline. Andmetüüp Variant, mis määrab soovitud tulevase väärtuse või sularahasaldo pärast viimase makse tegemist. Näiteks on laenu tulevane väärtus 0 eurot, kuna see on selle väärtus pärast viimast makset. Siiski, kui soovite säästa 18 aasta jooksul lapse hariduse jaoks 50 000 €, on tulevikuväärtuseks 50 000 €. Kui puudub, eeldatakse, et see on 0.
tüüp Valikuline. Variant , mis määrab maksetähtaega näitava arvu. Kui maksetähtaeg on makseperioodi lõpus, kasutage 0 või kui maksetähtaeg on perioodi alguses, kasutage 1. Kui puudub, eeldatakse, et see on 0.
guess Valikuline. Andmetüüp Variant, mis määrab hinnangulise väärtuse, mille funktsioon Rate peaks tagastama. Kui see puudub, on hinnang 0,1 (10 protsenti).

Kommentaarid

Annuiteet on kindla suurusega maksete jada, mida tehakse kindla perioodi jooksul. Annuiteet võib olla laen (nt eluasemelaen) või investeering (nt igakuise säästmise kava).

Kõigi argumentide puhul on raha, mida makstakse välja, näiteks pannakse hoiule, tähistatud negatiivsete arvudega. Saadav raha, nagu dividendid, on tähistatud positiivsete arvudega.

Funktsioon Rate arvutab iteratsioonimeetodil. Alates argumendi hinnang väärtusest liigub Funktsioon Rate läbi arvutuse, kuni tulemus on 0,00001 protsendi piiresse täpsusega. Kui funktsioon Rate pärast 20 katset tulemit ei leia, siis arvutus nurjub. Kui teie hinnang on 10 protsenti ja funktsioon Rate nurjub, proovige argumendi hinnang jaoks mõnda muud väärtust.

Päringu näide

Avaldis Tulemid
SELECT FinancialSample.*, (Rate([TermInYears]*12,-[MonthlyRePayment],[LoanAmount],0,0,0,1)*12) AS InterestRate FROM FinancialSample; Tagastab kõik tabeli "Finantssumma" ja aastaintressi määra väljad, mis põhinevad väärtustel "TermInYears", "MonthlyRePayment" ja "LoanAmount", ning kuvab tulemid veerus InterestRate.

VBA näide

Märkus.

Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites kasutatakse funktsiooni Rate , et arvutada laenu intressimäär, kui on antud maksete koguarv (TotPmts), laenumakse summa (Payment), laenu praegune väärtus või põhisumma (PVal), laenu tulevane väärtus (FVal), arv, mis näitab, kas maksetähtaeg on makseperioodi alguses või lõpus (PayType); ja eeldatava intressimäära (Guess) ühtlustamine.

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