Връща стойност от тип Double, указваща лихвения процент за един период за анюитет.
Синтаксис
Rate( периоди ; изплащане; настояща_стойност [, бъдеща_стойност ] [, тип ] [, предположение ] )
Синтаксисът на функцията Rate има следните аргументи:
|
Аргумент |
Описание |
|
периоди |
Задължителен. Стойност от тип Double , указваща общия брой периоди на плащане в анюитета. Ако например плащате месечни вноски по четиригодишен заем за кола, вашият заем ще има общо 4*12 (или 48) периода на плащане. |
|
плащане |
Задължителен. Число с двойна точност, показващо плащането, което ще се извършва във всеки период. Плащанията обикновено имат главница и лихва, които не се променят за времето на анюитета. |
|
Pv |
Задължително. Стойност с двойна точност, указваща настоящата стойност или днешната стойност на последователност от бъдещи плащания или приходи. Например, когато взимате пари назаем, за да закупите кола, размерът на кредита е настоящата стойност за заемодателя на месечните вноски за кола, които ще правите. |
|
бъдеща_стойност |
По желание. Стойност от тип вариант, указваща бъдещата стойност или паричната наличност, която искате, след като направите последното плащане. Например бъдещата стойност на заема е 0 лв., защото това е стойността му след последното плащане. Ако обаче искате да спестите 50 000 лв. за период от 18 години за образование на вашето дете, тогава бъдещата стойност е 50 000 лв. Ако не е въведена стойност, тя се приема за 0. |
|
тип |
По желание. Стойност от тип Variant, указваща кога са дължими плащанията. Използвайте 0, ако плащанията са дължими в края на периода за плащане, или 1, ако плащанията са дължими в началото на периода. Ако не е въведена стойност, тя се приема за 0. |
|
guess |
Незадължително. Стойност от тип Variant, задаваща стойността, която сте преценили, ще бъде върната от Rate. Ако предположение е пропуснато , 0,1 (10 процента). |
Забележки
Анюитетът е серия от фиксирани плащания, извършвани през определен период от време. Анюитетът може да бъде заем (например ипотека на апартамент) или инвестиция (например план за месечните спестявания).
За всички аргументи сумите, които сте платили (например депозитни вноски), са представени с отрицателни числа, а сумите, които сте получили (например дивиденти), са представени с положителни числа.
Скоростта се изчислява чрез итерация. Започвайки със стойността на предположението, ставката преминава през изчислението, докато резултатът стане точен до 0,00001 процента. Ако Rate не може да намери резултат след 20 опита, той е неуспешен. Ако предположението ви е 10 процента и процентът е неуспешен, опитайте с друга стойност за предположение.
Пример за заявка
|
Израз |
Резултати |
|
SELECT FinancialSample.*, (Rate([TermInYears]*12,-[MonthlyRePayment],[LoanAmount],0,0,0.1)*12) AS InterestRate FROM FinancialSample; |
Връща всички полета от таблицата "FinancialSample" и годишната "Ставка" на лихва на базата на "TermInYears", "MonthlyRePayment" и "LoanAmount" и показва резултатите в колона InterestRate. |
Пример на VBA
Забележка: Примерите по-долу илюстрират използването на тази функция във Visual Basic for Applications (VBA). За повече информация относно работата с VBA изберете Справочни материали за разработчици в падащия списък до Търсене и въведете един или няколко термина в полето за търсене.
Този пример използва функцията Rate за изчисляване на лихвения процент по заема при зададен общ брой плащания (TotPmts), размера на вноската по заема (Payment), настоящата стойност или главницата на заема (PVal), бъдещата стойност на заема (FVal), число, което показва дали плащането е дължимо в началото или края на периода за плащане (PayType), очакваната лихва (Guess).
Dim Fmt, FVal, Guess, PValDim 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 = ENDPERIODEnd IfAPR = (Rate(TotPmts, -Payment, PVal, _ FVal, PayType, Guess) * 12) * 100MsgBox "Your interest rate is " & _ Format(CInt(APR), Fmt) & " percent."
