Função IRR

Artigo
08/25/2010

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

Function IRR( _
    ByRef ValueArray() As Double, _
   Optional ByVal Guess As Double = 0.1 _
) As Double

Parâmetros

ValueArray
Obrigatório.Matriz de Double especificar valores de fluxo de caixa.A matriz deve conter pelo menos um valor negativo (um pagamento) e um valor positivo (uma confirmação).
Guess
Opcional.Objeto especificando o valor que você acha será retornado por IRR.Se omitido, Guess é 0,1 (10 por cento).

Exceções

Tipo de exceção	Número de erro	Condição
ArgumentException	5	Argumento de matriz valores são inválidos ou Guess < =-1.

Ver a coluna " número de erro " se você estiver atualizando aplicativos Visual Basic 6.0 que usam manipulação de erros não estruturada.(Você pode comparar o número do erro com a Propriedade do Número (Erro de objeto).) Entretanto, quando for possivel, você pode considerar substituir tal controle de erro por Visão Geral sobre a Manipulação Estruturada de Exceções para o Visual Basic.

Comentários

A taxa interna de retorno é a taxa de juros recebida para um investimento que consiste em pagamentos e recibos que ocorrem em intervalos regulares.

A função IRR usa a ordem dos valores dentro da matriz para interpretar a ordem de pagamentos e recibos.Não se esqueça inserir os valores de confirmação e pagamento na sequência correta.O fluxo de caixa para cada período não precisa ser corrigido, como ele é para uma anuidade.

IRR é calculada por iteração.Iniciando com o valor de Guess, IRR verificará o cálculo até que o resultado seja exato, de 0,00001 %.Se IRR Não é possível encontrar um resultado após 20 tentativas, ele falhará.

Exemplo

Nesse exemplo, a função IRR retorna a taxa interna de retorno de uma série de fluxos de caixa cinco contidas a matriz Values().A primeira elemento da matriz é um fluxo de caixa negativo que representa os custos de inicialização de negócios.Os quatro fluxos de caixa restantes representam fluxos de caixa positivos subseqüentes quatro anos.Guess é a taxa estimada interna de retorno.

' Define money format.
Dim MoneyFmt As String = "###,##0.00"
' Define percentage format.
Dim PercentFmt As String = "#0.00"

Dim values(4) As Double
' Business start-up costs.
values(0) = -70000
' Positive cash flows reflecting income for four successive years.
values(1) = 22000
values(2) = 25000
values(3) = 28000
values(4) = 31000

' Use the IRR function to calculate the rate of return.
' Guess starts at 10 percent.
Dim Guess As Double = 0.1
' Calculate internal rate.
Dim CalcRetRate As Double = IRR(values, Guess) * 100
' Display internal return rate.
MsgBox("The internal rate of return for these cash flows is " & _
    Format(CalcRetRate, CStr(PercentFmt)) & " percent.")