PPmt-funktio

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

Palauttaa Double-arvon, joka määrittää tietyn annuiteetin ajanjakson pääomamaksun säännöllisiin, kiinteiden maksujen ja kiinteän koron perusteella.

Syntaksi

PPmt(korko, per,nper,pv [, fv ] [, tyyppi ] )

PPmt-funktion syntaksissa on seuraavat argumentit:

Argumentti Kuvaus
Luokitus 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. Kokonaisluku, joka määrittää maksuajan välillä 1– kaudet.
nper Pakollinen. Kokonaisluku , 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).
Pv 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-argumentit on laskettava käyttäen samoissa yksiköissä ilmoitettuja maksukausia. Jos korko lasketaan esimerkiksi kuukausia käyttäen, nper on laskettava myös 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.

Esimerkki kyselystä

Lauseke Tulokset
SELECT FinancialSample.*, PPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample; Palauttaa kaikki kentät taulukosta "FinancialSample", laskee "LoanAmount"-sarakkeen "per"(10 tässä esimerkissä) maksetun pääomasumman "AnnualRate" ja "TermInYears" 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ä PPmt-funktion avulla lasketaan, kuinka suuri osa tietyn kauden maksuerästä on pääomaa, kun kaikki maksut ovat samanarvoisia. Annetut ovat korkoprosentti per kausi (APR / 12), maksukausi, jolta pääomaosuus halutaan (Period), maksujen kokonaismäärä (TotPmts), lainan nykyarvo tai pääoma (PVal), lainan tuleva arvo (FVal) ja luku, joka ilmaisee, erääntyykö maksu maksujakson alussa vai lopussa (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