Funkcija IPmt

Primjenjuje se na
Access za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Vraća broj dvostruke preciznosti koji određuje iznos kamate za zadano razdoblje anuiteta na temelju periodičnih, fiksnih rata i fiksne kamatne stope.

Sintaksa

IPmt(stopa; razd;brrazd;svv [, bv ] [, vrsta ] )

Sintaksa funkcije IPmt sadrži ove 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 Obavezno. Dvostruko određivanje razdoblja otplate u rasponu od 1 do brrazd.
brrazd Obavezno. Dvostruko označavanje ukupnog broja razdoblja plaćanja anuiteta. Ako, primjerice, mjesečno otplaćujete četverogodišnji kredit za automobil, kredit ima ukupno 4 * 12 (ili 48) razdoblja otplate.
pv Obavezno. Dvostruko određivanje trenutne vrijednosti ili sadašnje vrijednosti niza budućih uplata ili računa. Na primjer, kada posuđujete novac za kupnju automobila, iznos zajma je sadašnja vrijednost mjesečnih rata koje ćete zajmodavcu uplaćivati.
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. hipotekarna nekretnina) ili ulaganje (npr. mjesečni plan štednje).

Argumenti stopa i brrazd moraju se izračunati pomoću razdoblja otplate izraženih u istim jedinicama. Na primjer, ako se stopa izračunava pomoću mjeseci, brrazd se mora izračunati i pomoću 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 upita

Izraz Rezultati
SELECT FinancialSample.*, IPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample; Vraća sva polja iz tablice "Financijski uzorak", izračunava kamatu plaćenu u vrijednosti "na" (10 u ovom primjeru) vrijednosti "IznosKredita" na temelju vrijednosti "GodišnjaStopa" i "GodinaDugoročnice" te rezultate prikazuje u stupcu INTPaid.

VBA 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 primjeru funkcija IPmt izračunava koliki dio uplate čini kamata kada su sva uplate jednake vrijednosti. Navedeni su postotna kamatna stopa po razdoblju (APR / 12), razdoblje plaćanja za koje se traži dio kamate (Period), ukupan broj rata (TotPmts), sadašnja vrijednost ili glavnica zajma (PVal), buduća vrijednost zajma (FVal) i broj koji upućuje na to dospijeva li otplata na početku ili na kraju razdoblja otplate (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.