Rate funkcija

Taikoma
„Access“, skirta „Microsoft 365“ „Access 2024“ Access 2021 Access 2019 Access 2016

Pateikia dvigubą skaičių, nurodantį kasmetinės išmokos laikotarpio palūkanų normą.

Sintaksė

Rate(laikot_sk, išl,dv; [, br; ] [, tipas ; ] [, spėjimas ] )

Funkcijos RATE sintaksę sudaro šie argumentai:

Argumentas Aprašymas
laikot_sk Būtinas. Dvigubas skaičius , nurodantis bendrą mokėjimo laikotarpių per metus skaičių. Jei už ketveriems metams paimtą paskolą mokate kas mėnesį, jūsų paskola bus sudaryta iš 4 * 12 (arba 48) mokėjimo laikotarpių.
pmt Būtina. Dvigubas skaičius, nurodantis mokėjimą, kuris turės būti atliekamas kiekvieną laikotarpį. Mokėjimus paprastai sudaro pagrindinė suma ir palūkanos, kurios nekinta per visą anuiteto laikotarpį.
PV Būtinas. Dvigubas skaičius , nurodantis būsimų mokėjimų arba pajamų sekos dabartinę vertę ar šiandieninę vertę. Pavyzdžiui, kai skolinatės pinigų automobiliui įsigyti, paskolos suma yra dabartinė mėnesio įmokų už automobilį vertė skolintojui.
bv Pasirinktinis. Variantas, nurodantis būsimą vertę arba norimą grynųjų pinigų balansą atlikus paskutinį mokėjimą. Pavyzdžiui, būsimoji paskolos vertė yra 0 dol., nes tai jos vertė atlikus galutinę įmoką. Tačiau, jei norite sutaupyti 50 000 USD per 18 metų savo vaiko išsilavinimui, tada būsimoji vertė yra 50 000 USD. Jei nenurodoma, naudojama 0.
type Pasirinktinis. Variantas , nurodantis skaičių, nurodantį, kada turi būti atlikti mokėjimai. Naudokite 0, jeigu mokėjimai turi būti atlikti mokėjimo laikotarpio pabaigoje, arba 1, jeigu mokėjimai turi būti atlikti laikotarpio pradžioje. Jei nenurodoma, naudojama 0.
spėjimas Pasirinktinis. Variantą , nurodantį jūsų apskaičiuotą reikšmę, pateiks koeficientas. Jei spėjama reikšmė nenurodyta, ji yra 0,1 (10 procentų).

Pastabos

Anuitetas yra fiksuotų grynųjų mokėjimų, atliktų per tam tikrą laikotarpį, seka. Anuitetas gali būti paskola (pvz., būsto paskola) arba investicija (pvz., mėnesio santaupų planas).

Visiems argumentams grynieji pinigai, kuriuos išmokate, pvz., santaupų depozitai, rodomi neigiamais skaičiais; grynieji pinigai, kuriuos gaunate, pvz., dividendų čekiai, rodomi teigiamais skaičiais.

Tarifas apskaičiuojamas iteracija. Pradėdama nuo spėjimo reikšmės, funkcija RATE tol skaičiuoja tol, kol rezultato tikslumas yra 0,00001 procento. Jei po 20 bandymų funkcija RATE neranda rezultato, vadinasi, ji nepavyksta. Jei jūsų spėjimas yra 10 procentų, bet norma nepavyksta, pabandykite kitą spėjimo reikšmę.

Užklausos pavyzdys

Išraiška Rezultatai
SELECT FinancialSample.*, (Rate([TermInYears]*12,-[MonthlyRePayment],[LoanAmount],0,0,0.1)*12) AS InterestRate FROM FinancialSample; Grąžina visus lentelės "FinancialSample" laukus ir metinę palūkanų normą pagal "TermInYears", "MonthlyRePayment" ir "LoanAmount" ir rodo rezultatus stulpelyje Palūkanų norma.

VBA pavyzdys

Pastaba

Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje funkcija Rate naudojama apskaičiuoti paskolos palūkanų normą, atsižvelgiant į bendrą įmokų skaičių (TotPmts), paskolos įmokos sumą (Payment), dabartinę paskolos arba pagrindinės sumos vertę (PVal), būsimą paskolos vertę (FVal), skaičių, nurodantį, ar įmoka turi būti sumokėta mokėjimo laikotarpio pradžioje, ar pabaigoje (PayType), ir numatomos palūkanų normos () apytikslė dalis (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."