Funktsioon IPmt

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

Tagastab väärtuse Kahekordne, mis määrab perioodiliste püsimaksete ja fikseeritud intressimäära põhjal annuiteedi antud perioodi intressimakse.

Süntaks

IPmt(määr, per,per_arv,prg [, tul_väärt ] [, tüüp ] )

Funktsiooni IPmt süntaksil on järgmised argumendid.

Argument Kirjeldus
määr Nõutav. Intressimäära perioodi kohta täpsustav kahekordne. Kui näiteks võtate autoostulaenu aastase intressimääraga (APR) 10 protsenti ja teete igakuiseid makseid, on määr perioodi kohta 0,1/12 või 0,0083.
per Nõutav. Topelttäpsusega arv, mis määrab makseperioodi vahemikus 1 kuni per_arv.
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.
praeg_väärt 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. Pärast viimase makse tegemist soovitavat tulevikuväärtust või saldot täpsustav variant. Näiteks on laenu tulevikuväärtus 0 €, 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ähtaja. 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.

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

Argumendid määr ja per_arv tuleb arvutada samades ühikutes väljendatud makseperioodide abil. Näiteks kui määr arvutatakse kuude abil, tuleb per _arv arvutada ka kuude põhjal.

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.

Päringu näide

Avaldis Tulemid
SELECT FinancialSample.*, IPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample; Tagastab kõik tabeli "FinancialSample" väljad, arvutab intressi, mis on makstud "Laenusumma" "per"(10 selles näites)" põhjal "AnnualRate" ja "TermInYears" ning kuvab tulemid veerus INTPaid.

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 arvutatakse funktsiooni IPmt abil, kui suur osa maksest on intressid, kui kõik maksed on võrdse väärtusega. Antud on intressimäär perioodi kohta (APR / 12), makseperiood, mille kohta intressiosa on soovitud (Period), maksete koguarv (TotPmts), laenu praegune väärtus või põhisumma (PVal), laenu tulevane väärtus (FVal) ja arv, mis näitab, kas maksetähtaeg on makseperioodi alguses või lõpus (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.