Partilhar via


Função MTIR

Devolve um Valor Duplo especificando a taxa interna de rentabilidade modificada para uma série de fluxos monetários periódicos (pagamentos e recibos).

Sintaxe

MIRR(values( ), finance_rate, reinvest_rate)

A função MIRR tem estes argumentos nomeados:

Sair Descrição
values( ) Obrigatório. Matriz de Duplo especificando valores de fluxo de caixa. A matriz tem de conter, pelo menos, um valor negativo (um pagamento) e um valor positivo (um recibo).
finance_rate Obrigatório. O dobro da especificação da taxa de juro paga como custo do financiamento.
reinvest_rate Obrigatório. Dupla especificação da taxa de juro recebida sobre os ganhos do reinvestimento em numerário.

Comentários

A taxa de rentabilidade interna modificada é a taxa interna de retorno quando os pagamentos e as receitas são financiados a taxas diferentes. A função MIRR tem em conta o custo do investimento (finance_rate) e a taxa de juro recebida no reinvestimento de dinheiro (reinvest_rate).

Os argumentosfinance_rate e reinvest_rate são percentagens expressas como valores decimais. Por exemplo, 12 por cento é expresso como 0,12.

A função MIRR utiliza a ordem dos valores na matriz para interpretar a ordem de pagamentos e recibos. Certifique-se de que introduz os valores de pagamento e recibo na sequência correta.

Exemplo

Este exemplo utiliza a função MIRR para devolver a taxa interna de rentabilidade 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 juro 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.