Функция МВСД

Возвращает значение типа Double, определяющее измененную внутреннюю норму прибыли для последовательности периодических потоков денежных средств (платежи и поступления).

Синтаксис

MIRR(values( ), finance_rate, reinvest_rate)

Функция MIRR использует следующие именованные аргументы:

Part Описание
values( ) Обязательно. Массив с типом Double, определяющий значения денежного потока. Этот массив должен содержать по крайней мере одно отрицательное значение (платеж) и одно положительное значение (получение).
finance_rate Обязательно. Значение типа Double, определяющее процентную ставку, представляющую собой стоимость финансирования.
reinvest_rate Обязательно. Значение типа Double, определяющее процентную ставку прибыли, получаемую благодаря реинвестированию денежных средств.

Замечания

Измененная внутренняя норма прибыли — это внутренняя норма прибыли для случая, когда для финансирования платежей и поступлений используются различные ставки. Функция MIRR учитывает как стоимость инвестиций (finance_rate), так и процентную ставку, получаемую от реинвестирования денежных средств (reinvest_rate).

Аргументыfinance_rate и reinvest_rate — это проценты, выраженные в виде десятичных значений. Например, 12 процентов представляется как 0,12.

Функция MIRR использует порядок значений в массиве для интерпретации порядка платежей и поступлений. Следите, чтобы значения платежей и поступлений указывались в правильном порядке.

Пример

В этом примере функция MIRR используется для возврата измененной внутренней нормы доходности для ряда денежных потоков, содержащихся в массиве Values(). LoanAPR представляет проценты по финансированию и InvAPR процентную ставку, полученную при реинвестировании.

Dim LoanAPR, InvAPR, Fmt, RetRate, Msg
Static Values(5) As Double    ' Set up array.
LoanAPR = .1    ' Loan rate.
InvAPR = .12    ' Reinvestment rate.
Fmt = "#0.00"    ' Define money 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
RetRate = MIRR(Values(), LoanAPR, InvAPR)    ' Calculate internal rate.
Msg = "The modified internal rate of return for these five cash flows is"
Msg = Msg & Format(Abs(RetRate) * 100, Fmt) & "%."
MsgBox Msg    ' Display internal return rate.
        

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.