Función MIRR
Devuelve un tipo Double que especifica la tasa interna de retorno modificada para una serie de flujos de efectivo periódicos (pagos e ingresos).
MIRR(values( ), finance_rate, reinvest_rate)
La función MIRR tiene estos argumentos con nombre:
Parte | Descripción |
---|---|
values( ) | Obligatorio. Matriz de valores dobles que especifica valores de flujo de caja. La matriz debe contener al menos un valor negativo (pago) y un valor positivo (cobro). |
finance_rate | Obligatorio. Tipo Double que especifica el tipo de interés pagado como coste de la financiación. |
reinvest_rate | Obligatorio. Tipo Double que especifica el tipo de interés recibido en beneficios de reinversión de efectivo. |
La tasa interna de retorno modificada es la tasa interna de retorno cuando los pagos y los ingresos se financian a un tipo distinto. La función MIRR tiene en cuenta tanto el coste de la inversión (finance_rate) como el tipo de interés recibido en la reinversión de efectivo (reinvest_rate).
Los argumentosfinance_rate y reinvest_rate son porcentajes expresados como valores decimales. Por ejemplo, el 12 por ciento se expresa como 0,12.
La función MIRR usa el orden de valores en la matriz para interpretar el orden de pagos e ingresos. Asegúrese de introducir los valores de pago e ingreso en la secuencia correcta.
En este ejemplo se usa la función MIRR para devolver la tasa interna de retorno modificada de una serie de flujos de efectivo contenidos en la matriz Values()
.
LoanAPR
representa el interés de la financiación y InvAPR
representa el tipo de interés recibido en la reinversión.
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.
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.