Повертає значення подвійної точності, яке вказує внутрішню норму прибутковості для ряду періодичних грошових потоків (платежів і надходжень).
Синтаксис
IRR(values () [; припущення ] )
Синтаксис функції IRR має такі аргументи:
| Аргумент | Опис |
|---|---|
| values () | Обов’язковий аргумент. Масив чисел подвійної точності, які представляють обсяги руху грошових коштів. Цей масив має містити принаймні одне від’ємне (платіж) і одне додатне значення (надходження). |
| Припущення | — необов’язковий аргумент. Значення, що задає значення, яке ви оцінюєте, функція IRR повертає. Якщо припущення відсутнє, воно дорівнює 0,1 (10 відсоткам). |
Примітки
Внутрішня норма прибутковості — це відсоткова ставка, отримана за інвестицію, що складається з платежів і надходжень, що відбуваються через регулярні проміжки часу.
Функція IRR визначає порядок платежів і надходжень, використовуючи послідовність значень у масиві. Суми платежів і надходжень має бути вказано в правильному порядку. Рух грошових коштів за кожен період не потрібно фіксувати, як для щорічного платежу.
Функція IRR обчислюється за допомогою ітерації. Функція IRR виконує циклічне обчислення, доки результат не буде точним до 0,00001 відсотка. Якщо функція IRR не може знайти результат після 20 спроб, вона не спрацьовує.
Приклад
Примітка.
У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.
У цьому прикладі функція IRR повертає внутрішню норму прибутковості для ряду з 5 грошових потоків, що містяться в масиві Values(). Перший елемент масиву – це від'ємний грошовий потік, який представляє початкові витрати бізнесу. Решта 4 грошові потоки представляють собою додатні грошові потоки на наступні 4 роки.
Guess – це передбачувана внутрішня норма прибутковості.
Dim Guess, Fmt, RetRate, Msg
Static Values(5) As Double ' Set up array.
Guess = .1 ' Guess starts at 10 percent.
Fmt = "#0.00" ' Define percentage format.
Values(0) = -70000 ' Business start-up costs.
' Positive cash flows reflecting income for
' four successive years.
Values(1) = 22000 : Values(2) = 25000
Values(3) = 28000 : Values(4) = 31000
' Calculate internal rate.
RetRate = IRR(Values(), Guess) * 100
Msg = "The internal rate of return for these " & _
"five cash flows is "
Msg = Msg & Format(RetRate, Fmt) & " percent."
MsgBox Msg ' Display internal return rate.