Funktionen RBETALNING

Gäller för
Access för Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Returnerar ett värde av datatypen Double som anger räntebetalningen för en given period i en annuitet baserat på periodiska, fasta betalningar och en fast räntesats.

Syntax

RBETALNING(ränta; period; periodantal; nuvärde [, slutvärde ] [, typ ] )

Syntaxen för funktionen RBETALNING har följande argument:

Argument Beskrivning
betygsätta Obligatoriskt. Double (Dubbel) anger räntan per period. Om du t.ex. tar ett billån med en årlig räntesats (APR) på 10 procent och gör månatliga betalningar, är räntan per period 0,1/12, alltså 0,0083.
per Obligatoriskt. Double med angivande av betalningsperiod i intervallet 1 till periodantal.
periodantal Obligatoriskt. Double anger det totala antalet betalningsperioder för annuiteten. Om du till exempel gör månatliga inbetalningar på ett fyraårigt lån, har lånet totalt 4 gånger 12 (alltså 48) betalningsperioder.
Nuvärde Obligatoriskt. Double anger nuvärdet eller värdet i dag av en serie framtida in- eller utbetalningar. Till exempel, när du lånar pengar för att köpa en bil, är lånebeloppet det nuvarande värdet för långivaren av de månatliga bilbetalningarna du kommer att göra.
slutvärde Valfritt. En variant där du anger ett framtida värde eller saldo för när du har gjort den sista betalningen. Ett exempel: det framtida värdet av ett lån är 0 kr, eftersom det är dess värde efter den sista betalningen. Men om du vill spara t.ex. 500 000 under en period på 18 år för barnens framtida liv, är 500 000 det framtida värdet. Om inget värde anges används automatiskt värdet 0.
Typ Valfritt. Variant som anger när betalningarna ska göras. Använd 0 om betalningarna förfaller i slutet av perioden. Använd 1 om betalningarna förfaller i början av perioden. Om inget värde anges används automatiskt värdet 0.

Kommentarer

En annuitet är en serie konstanta betalningar över en sammanhängande period. En annuitet kan vara ett lån (t.ex. ett huslån) eller en investering (t.ex. en plan för månatligt sparande).

Argumenten ränta och periodantal måste beräknas med betalningsperioder som uttrycks i samma enhet. Om ränta till exempel beräknas med månader måste periodantal också beräknas med månader.

För alla argument gäller att de betalningar du gör, t ex inbetalningar på sparkonto, representeras av negativa tal och pengar som du tar emot, t ex återbäring, representeras av positiva tal.

Exempel på fråga

Uttryck Resultat
SELECT FinancialSample.*, IPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample; Returnerar alla fält från tabellen "FinancialSample", beräknar den ränta som betalas i "per"(10 i det här exemplet) för "LoanAmount" baserat på "AnnualRate" och "TermInYears" och visar resultatet i kolumnen INTPaid.

VBA-exempel

Obs

I exemplen nedan visar vi hur du använder den här funktionen i en Visual Basic for Applications-modul (VBA). Om du vill läsa mer om hur man använder VBA, kan du välja Info för utvecklare i listrutan bredvid Sök och sedan skriva en eller flera söktermer i sökrutan.

I det här exemplet används funktionen Rbetalning för att beräkna hur stor betalning som är ränta när alla betalningar har samma värde. Givet är räntesatsen per period (APR / 12), den betalningsperiod för vilken räntedelen önskas (Period), det totala antalet betalningar (TotPmts), nuvärdet eller kapitalbeloppet av lånet (PVal), det framtida värdet av lånet (FVal) och ett tal som anger om betalningen förfaller i början eller slutet av betalningsperioden (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.