Funkcija PPmt

Važno :  Ovaj je članak strojno preveden. Pogledajteizjavu o odricanju od odgovornosti. Verziju ovog članka na engleskom potražite ovdje.

Vraća dvostruki navodeći glavnice za zadano razdoblje anuiteta koji se temelji na periodičnim, fiksnim plaćanja i fiksne kamatne stope.

Sintaksa

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

Sintaksa funkcije PPmt sadrži sljedeće argumente:

Argument

Opis

stopa

Obavezno. Broj dvostruke preciznosti koji određuje kamatnu stopu po razdoblju otplate. Ako vam je, primjerice, odobren kredit za kupnju automobila po godišnjoj kamatnoj stopi od 10 posto i mjesečno ga otplaćujete, rata po razdoblju otplate iznosi 0,1/12 ili 0,0083.

po

Obavezan. Cijeli broj koji određuje razdoblje otplate u rasponu od 1 do nper.

brrazd

Obavezan. Cijeli broj koji određuje ukupan broj razdoblja naplate u anuiteta. Ako, na primjer, ako četverogodišnja automobila plaćate mjesečno, vaš zajam ima od 4 * 12 (ili 48) razdoblja plaćanja Ukupno.

PV

Obavezan. Dvostruki navodeći sadašnja vrijednost ili danas, vrijednost u nizu budućih novčanih izdataka ili potvrde. Ako, na primjer, kada dobijete novca za kupnju automobila, iznos kredita je trenutna vrijednost mjesečnih otplata automobil koje ćete izvršiti kredita.

bv

Neobavezno. Vrijednost vrste Variant buduća je vrijednost ili saldo koji želite postići nakon posljednje uplate. Na primjer, buduća vrijednost kredita je 0 kn jer je to vrijednost nakon posljednje uplate. No ako želite uštedjeti 300 000 kn u razdoblju od 18 godina za školovanje svog djeteta, tada je 300 000 kn buduća vrijednost. Ako se izostavi, pretpostavlja se da je 0.

vrsta

Neobavezno. Vrijednost vrste Variant koja određuje dospijeće uplata. Koristite vrijednost 0 ako je dospijeće uplata na kraju razdoblja otplate ili 1 ako je dospijeće uplata na početku razdoblja. Ako se izostavi, pretpostavlja se da je 0.


Napomene

Anuitet je niz fiksnih uplata tijekom određenog razdoblja. Anuitet može biti kredit (npr. hipotekarni kredit) ili ulaganje (npr. mjesečni plan štednje).

Argumente stopa i brrazd potrebno je izračunati pomoću razdoblja otplate izraženih u istim jedinicama. Ako se, primjerice, stopa izračunava na temelju mjeseci, i brrazd se mora izračunavati na temelju mjeseci.

Za sve se argumente plaćeni iznos (npr. polog za štednju) izražava negativnim brojevima. Primljeni iznos (npr. ček od dividende) izražava se pozitivnim brojevima.

Primjer

Napomena : Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom se primjeru koristi funkcija PPmt da biste izračunali koliko uplata u određenom razdoblju koji je glavnica kada su sve otplate jednake vrijednosti. Dani su postoci kamate po razdoblju (APR / 12), razdoblje otplate čijim glavni dio je željeni (Period), ukupan broj uplata (TotPmts), trenutna vrijednost ili glavnicu na zajam, plaćenu (PVal), buduća vrijednost zajma (FVal) i broj koji označava hoće li se otplata obaviti na početku ili na kraju razdoblja plaćanja (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

Napomena : Izjava o odricanju od odgovornosti za strojni prijevod: ovaj je članak preveo računalni sustav bez ljudske intervencije. Microsoft nudi strojne prijevode da bi korisnicima koji ne razumiju engleski omogućio čitanje sadržaja o Microsoftovim proizvodima, uslugama i tehnologijama. Budući da je preveden strojno, članak možda sadrži pogreške u vokabularu, sintaksi ili gramatici.

Proširite svoje vještine
Istražite osposobljavanje

Jesu li vam ove informacije bile korisne?

Hvala vam na povratnim informacijama!

Hvala vam na povratnim informacijama! Čini se da bi vam pomoglo kad bismo vas povezali s nekim od naših agenata podrške za Office.

×