Funktsioon PPmt

NB! :  See artikkel on masintõlgitud, vaadake lahtiütlust. Selle artikli ingliskeelse versiooni leiate aadressilt (viiteks).

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

Süntaks

PPmt ( rate, per, nper , pv [, fv ] [, type ] )

Funktsiooni PPmt süntaksil on järgmised argumendid.

Argument

Kirjeldus

määr

Nõutav. Topeltäpsusega arv, mis määrab intressimäära perioodi kohta. Näiteks kui teie autoliisingu aastane intressimäär (APR) on 10 protsenti ning maksate kuumakseid, on määr perioodi kohta 0,1/12 või 0,0083.

per

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

per_arv

Nõutav. Täisarv, mis määrab makseperioodide koguarvu annuiteedis. Näiteks kui maksate nelja-aastase autoliisingu korral kuumakseid, on teie liisingul kokku 4 * 12 (või 48) makseperioodi.

pr

Nõutav. Topelttäpsusega arv, mis määrab tulevaste maksete või sissetulekute praeguse väärtuse või tänase väärtuse. Näiteks kui võtate auto ostmiseks laenu, on laenusumma laenuandjale igakuiste liisingumaksete praegune väärtus.

tv

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

Fakultatiivne. Variant, mis määrab maksete tähtaja. Kasutage väärtust 0, kui maksetähtaeg on makseperioodi lõpus, või kasutage väärtust 1, kui maksetähtaeg on makseperioodi alguses. Kui argumendile väärtust ei määrata, on selle väärtus vaikimisi 0.


Kommentaarid

Annuiteet on kindla suurusega maksete jada, mida tehakse kindla perioodi jooksul. Annuiteet võib olla laen (nt kodu hüpoteeklaen) või investeering (nt igakuine säästuplaan).

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 argumentidega on väljamakstav (nt hoiustatav) raha tähistatud negatiivsete arvudega. Saadav raha (nt 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.

Järgmises näites arvutatakse funktsiooni PPmt abil, kui suure osa kindla perioodi maksest moodustab laenu põhisumma tagasimakse, kui kõik maksed on võrdsed. Deklareeritud on järgmised muutujad: intressimäär protsentides perioodi kohta (APR / 12), makseperiood, mille kohta tahetakse teada laenu põhisumma tagasimakse suurust (Period), maksete koguarv (TotPmts), laenu protsent või laenu põhisumma (PVal), laenu tulevikuväärtus (FVal) ja arv mis määrab, 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

Märkus. : Masintõlke lahtiütlus. Selle artikli tõlkis arvutisüsteem ilma inimese sekkumiseta. Microsoft pakub selliseid masintõlkeid, et inglise keelt mittekõnelevad kasutajad saaksid vaadata sisu Microsofti toodete, teenuste ja tehnoloogiate kohta. Kuna artikkel on masintõlgitud, võib see sisaldada sõnavara-, süntaksi- või grammatikavigu.

Täiendage oma 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.

×