Funktionen Rate

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äntesatsen per period för en annuitet.

Syntax

Ränta(periodantal; betalning;nuvärde [, slutvärde ] [, typ ] [, gissning ] )

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

Argument Beskrivning
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.
betalning Obligatoriskt. Double (Dubbel) anger betalningen för varje enskild period. Betalningarna innehåller vanligen kapital och ränta som inte ändras under löptiden för ett annuitetslån.
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 gör 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 där ett nummer anges 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.
gissa Valfritt. Variant som anger värdet som du uppskattar kommer att returneras av Rate. Om argumentet utelämnas är gissning 0,1 (10 procent).

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).

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.

Hastigheten beräknas genom iteration. Ränta startar med värdet för gissning och upprepar beräkningen tills resultatet är korrekt med en noggrannhet av 0,00001 procent. Om Rate inte kan hitta ett resultat efter 20 försök misslyckas det. Om din gissning är 10 procent och Rate misslyckas kan du prova med ett annat värde för gissning.

Exempel på fråga

Uttryck Resultat
SELECT FinancialSample.*, (Rate([TermInYears]*12,-[MonthlyRePayment],[LoanAmount],0,0,0.1)*12) AS InterestRate FROM FinancialSample; Returnerar alla fält från tabellen "FinancialSample" och den årliga räntesatsen baserat på "TermInYears", "MonthlyRePayment" och "LoanAmount" och visar resultatet i kolumnen Räntesats.

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 Ränta för att beräkna räntesatsen för ett lån givet det totala antalet betalningar (TotPmts), betalningsbeloppet (Payment), nuvärdet eller kapitalbeloppet för lånet (PVal), det framtida värdet på lånet (FVal), ett tal som anger om betalningen förfaller i början eller slutet av betalningsperioden (PayType), och en uppskattning av den förväntade räntesatsen (Guess).

Dim Fmt, FVal, Guess, PVal
Dim Payment, TotPmts, PayType, APR
' When payments are made.
Const ENDPERIOD = 0, BEGINPERIOD = 1    
Fmt = "##0.00"    ' Define percentage format.
FVal = 0    ' Usually 0 for a loan.
Guess = .1    ' Guess of 10 percent.
PVal = InputBox("How much did you borrow?")
Payment = InputBox("What's your monthly payment?")
TotPmts = InputBox("How many monthly payments do " & _
          "you have to make?")
PayType = MsgBox("Do you make payments at the end " & _
          "of the month?", vbYesNo)
If PayType = vbNo Then 
    PayType = BEGINPERIOD 
    Else PayType = ENDPERIOD
End If
APR = (Rate(TotPmts, -Payment, PVal, _
      FVal, PayType, Guess) * 12) * 100
MsgBox "Your interest rate is " & _
    Format(CInt(APR), Fmt) & " percent."