Tagastab väärtuse Kahekordne, mis määrab perioodiliste püsimaksete ja fikseeritud intressimäära põhjal annuiteedi antud perioodi põhimakse.
Süntaks
PPmt ( määr, per, per_arv , prg [, tul_väärt ] [, tüüp ] )
Funktsiooni PPmt 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. Täisarv, mis määrab makseperioodi vahemikus 1 kuni per_arv. |
per_arv |
Nõutav. Täisarv , mis määrab makseperioodide koguarvu annuiteedis. Näiteks, kui teete nelja-aastase autoostulaenu korral igakuiseid makseid, on teie laenul kokku 4 × 12 (või 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).
Argumentide määr ja per_arv arvutamiseks tuleb kasutada samades ühikutes väljendatud makseperioode. Näiteks, kui määra arvutamiseks on kasutatud kuid, tuleb ka per_arv arvutada kuudes.
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.*, PPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample; |
Tagastab kõik tabeli "FinancialSample" väljad, arvutab "Laenusumma" põhisumma, mis on makstud "Laenusumma" "per"(selles näites)", võttes aluseks "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 PPmt abil kindla perioodi makse põhisumma, kui kõik maksed on võrdse väärtusega. Esitatud on intressimäär perioodi kohta (APR / 12), makseperiood, mille põhiosa 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 NL, TB, Fmt, FVal, PVal, APR, TotPmts, PayType, Payment, Msg, MakeChart, Period, P, I
Const ENDPERIOD = 0, BEGINPERIOD = 1 ' When payments are made. NL = Chr(13) & Chr(10) ' Define newline. TB = Chr(9) ' Define tab. Fmt = "###,###,##0.00" ' Define money format. FVal = 0 ' Usually 0 for a loan. 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 do you have to make?") PayType = MsgBox("Do you make payments at the end of month?", vbYesNo) If PayType = vbNo Then PayType = BEGINPERIOD Else PayType = ENDPERIOD Payment = Abs(-Pmt(APR / 12, TotPmts, PVal, FVal, PayType)) Msg = "Your monthly payment is " & Format(Payment, Fmt) & ". " Msg = Msg & "Would you like a breakdown of your principal and " Msg = Msg & "interest per period?" MakeChart = MsgBox(Msg, vbYesNo) ' See if chart is desired. If MakeChart <> vbNo Then If TotPmts > 12 Then MsgBox "Only first year will be shown." Msg = "Month Payment Principal Interest" & NL For Period = 1 To TotPmts If Period > 12 Then Exit For ' Show only first 12. P = PPmt(APR / 12, Period, TotPmts, -PVal, FVal, PayType) P = (Int((P + .005) * 100) / 100) ' Round principal. I = Payment - P I = (Int((I + .005) * 100) / 100) ' Round interest. Msg = Msg & Period & TB & Format(Payment, Fmt) Msg = Msg & TB & Format(P, Fmt) & TB & Format(I, Fmt) & NL Next Period MsgBox Msg ' Display amortization table. End If