IPMT-funktio

Käytetään kohteeseen
Access for Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Palauttaa Double-arvon, joka määrittää kiinteään korkoon perustuvan annuiteetin tietyn kauden korkomaksun.

Syntaksi

IPmt(korko; kausi; kaudet_yht; nykyarvo ] [, laji ] )

IPmt-funktion syntaksilla on seuraavat argumentit:

Argumentti Kuvaus
korko Pakollinen. Kaksinkertainen, joka määrittää korkoprosentin per ajanjakso. Jos esimerkiksi otat autolainan, jonka vuotuinen korkoprosentti on 10 ja jota lyhennät kuukausittain, korko per ajanjakso on 0,1/12 tai 0,0083.
per Pakollinen. Double-määritä maksuaika välillä 1–kaudet_yht.
kaudet_yht Pakollinen. Double-arvo, joka määrittää annuiteetin maksukausien kokonaismäärän. Jos esimerkiksi lyhennät neljän vuoden autolainaa kuukausittain, lainan maksuajanjaksojen kokonaismäärä on 4 * 12 (tai 48).
nykyarvo Pakollinen. Double-arvo, joka määrittää tulevien maksujen ja saamisten nykyarvon tai päivänarvon. Jos esimerkiksi otat lainaa auton ostoa varten, lainasumma on nykyarvo lainaajalle, jolle maksat auton kuukausittaiset maksut.
ta Valinnainen. Variantti-tyyppiä oleva arvo, joka määrittää tulevan arvon tai kassavaran, jonka haluat loppusuorituksen jälkeen. Lainan tuleva arvo on esimerkiksi 0 euroa, koska se on sen arvo loppusuorituksen jälkeen. Jos kuitenkin haluat säästää 50 000 euroa 18 vuoden aikana lastasi varten, tuleva arvo on 50 000. Jos jätetään pois, oletusarvona on 0.
tyyppi Valinnainen. Variantti, joka määrittää maksujen eräpäivän. Käytä arvoa 0, jos maksujen eräpäivä on maksuajanjakson lopussa, ja arvoa 1, jos maksujen eräpäivä on maksuajanjakson alussa. Jos jätetään pois, oletusarvona on 0.

Huomautuksia

Annuiteetti on sarja kiinteitä maksuja, jotka tehdään jonakin ajanjaksona. Annuiteetti voi olla laina (kuten asuntolaina) tai sijoitus (kuten kuukausittainen säästösuunnitelma).

Korko- ja kaudet_yht-argumentit on laskettava samoissa yksiköissä ilmaistujen maksukausien perusteella. Jos korko on esimerkiksi laskettu käyttäen kuukausia, myös kaudet_yht on laskettava kuukausia käyttäen.

Maksetut käteiset (kuten säästötalletukset) esitetään kaikissa argumenteissa negatiivisina numeroina. Vastaanotetut käteiset (kuten osinkoliput) esitetään positiivisina numeroina.

Kyselyesimerkki

Lauseke Tulokset
SELECT FinancialSample.*, IPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample; Palauttaa kaikki FinancialSample-taulukon kentät, laskee maksetun koron lainasumman (tässä esimerkissä 10) Vuosikoron ja TermInYears-arvon perusteella ja näyttää tulokset sarakkeessa INTPaid.

VBA-esimerkki

Huomautus

Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.

Tässä esimerkissä IPmt-funktiolla lasketaan, kuinka suuri osa maksusta on korkoa, kun kaikki maksut ovat samanarvoisia. Annettu ovat korkoprosentti per ajanjakso (),APR / 12 maksukausi, jolle korko-osuus halutaan (Period), maksusuoritusten kokonaismäärä (TotPmts), lainan nykyarvo tai pääoma (PVal), lainan tuleva arvo (FVal) ja luku, joka ilmaisee, erääntyykö maksu maksuajanjakson alussa vai lopussa (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.