Compartilhar via


Função MTIR

Retorna um Double especificando a taxa de retorno interna modificada para uma série de fluxos de caixa periódicos (pagamentos e recibos).

Sintaxe

MIRR(values( ), finance_rate, reinvest_rate)

A função MIRR tem esses argumentos nomeados:

Sair Descrição
valores( ) Obrigatório. Matriz de Double especificando valores de fluxo de caixa. A matriz deve conter pelo menos um valor negativo (um pagamento) e um valor positivo (um recibo).
finance_rate Obrigatório. Especifique duas vezes a taxa de juros paga como o custo do financiamento.
reinvest_rate Obrigatório. Especifique duas vezes a taxa de juros recebida nos ganhos de reinvestimento em dinheiro.

Comentários

A taxa de retorno interna modificada é a taxa interna de retorno quando pagamentos e recibos são financiados a taxas diferentes. A função MIRR leva em conta o custo do investimento (finance_rate) e a taxa de juros recebida no reinvestimento de dinheiro (reinvest_rate).

Os argumentosfinance_rate e reinvest_rate são percentuais expressos como valores decimais. Por exemplo, 12% são expressos como 0,12.

A função MIRR usa a ordem de valores dentro da matriz para interpretar a ordem de pagamentos e recibos. Insira os valores de pagamento e recibo na sequência correta.

Exemplo

Este exemplo usa a função MIRR para retornar a taxa de retorno interna modificada para uma série de fluxos de caixa contidos na matriz Values(). LoanAPR representa os juros de financiamento e InvAPR representa a taxa de juros recebida no reinvestimento.

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.
        

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.