Office
Logi sisse

Funktsioon PPmt

Märkus.: Soovime pakkuda teie keeles kõige ajakohasemat spikrisisu niipea kui võimalik. See leht on tõlgitud automaatselt ja sellel võib leiduda grammatikavigu või ebatäpsusi. Tahame, et sellest sisust oleks teile abi. Palun märkige selle lehe allservas, kas sellest teabest oli teile kasu või mitte. Soovi korral saab ingliskeelset artiklit lugeda siit.

Tagastab kahekordne, mis määrab perioodilistel maksetel ja fikseeritud intressimääral põhineva annuiteedi antud perioodi põhisummamakse.

Süntaks

PPmt ( määr, per, per_arv ; pv [tul_väärt ] [Tüüp ] )

Funktsiooni PPmt süntaksil on järgmised argumendid.

Argument

Kirjeldus

rate

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.

kohta.

Nõutav. Täisarv vahemikus 1 kuni per_arv, mis määrab perioodi makse.

nper

Nõutav. Täisarv , mis määrab annuiteedi makseperioodide arv. Kui teete nelja-aastane auto laenu igakuiste maksete, on teie laenu 4 * 12 (või 48) makseperioodide arv.

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. 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. Maksetähtaega täpsustav variant. Kui maksetähtaeg on makseperioodi lõpus, kasutage 0. Kui maksetähtaeg on makseperioodi 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 rate ja nper arvutamiseks tuleb kasutada samades ühikutes väljendatud makseperioode. Näiteks, kui rate arvutamiseks on kasutatud kuid, tuleb ka nper 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.

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 PPmt arvutamiseks, kui palju kindla perioodi makse on põhisumma, kui kõik maksed on võrdne väärtusega. On antud perioodi (APR / 12) kohta protsent intressimäära mille peamine osa on soovitud (Period), maksete (TotPmts), nüüdisväärtus või (PVal) laenu põhisumma koguarvu maksetähtaeg on tulevane väärtus (FVal) laenude ja arvu, mis näitab, kas makse tuleb algusesse või lõppu makse (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
Täiendage Office'i kasutamise oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×