Функция MIRR

Применяется к
Access для Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

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

Синтаксис

MIRR(values (), finance_rate, reinvest_rate)

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

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

    

Замечания

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

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

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

Пример

Примечание

В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.

В этом примере функция 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
' Calculate internal rate.
RetRate = MIRR(Values(), LoanAPR, InvAPR)
Msg = "The modified internal rate of return " & _
      "for these five cash flows is"
Msg = Msg & Format(Abs(RetRate) * 100, Fmt) & "%."
' Display internal return rate.
MsgBox Msg