Como usar a função MIRR no VBA?

A função MIRR (Modified Internal Rate of Return) no Excel é usada para calcular a taxa interna de retorno ajustada, levando em consideração diferentes taxas para o investimento e para o reinvestimento. No VBA, você pode usar a função `WorksheetFunction.MIRR` para acessar essa funcionalidade. Vou mostrar um exemplo de como usá-la no VBA.

Suponha que você tenha uma série de fluxos de caixa nos quais deseja calcular o MIRR, com taxas de financiamento e de reinvestimento definidas. Veja como você pode fazer isso:

Sub CalcularMIRR()
    Dim fluxoDeCaixa As Variant
    Dim taxaFinanciamento As Double
    Dim taxaReinvestimento As Double
    Dim resultadoMIRR As Double

    ' Defina os fluxos de caixa em uma matriz. Por exemplo:
    fluxoDeCaixa = Array(-1000, 200, 300, 400, 500)

    ' Defina a taxa de financiamento. Por exemplo, 10% como 0.1
    taxaFinanciamento = 0.1

    ' Defina a taxa de reinvestimento. Por exemplo, 12% como 0.12
    taxaReinvestimento = 0.12

    ' Calcular o MIRR usando a função WorksheetFunction.MIRR
    resultadoMIRR = WorksheetFunction.MIRR(fluxoDeCaixa, taxaFinanciamento, taxaReinvestimento)

    ' Exibir o resultado
    MsgBox "O MIRR calculado é: " & Format(resultadoMIRR, "Percent")
End Sub

Passos para usar o código:

Abra o Excel e pressione `ALT + F11` para abrir o Editor do VBA.
Insira um novo módulo indo em `Inserir` > `Módulo`.
Copie e cole o código acima no módulo.
Feche o Editor do VBA e volte para o Excel.
Para executar a macro, pressione `ALT + F8`, selecione `CalcularMIRR` e clique em `Executar`.

Esse script irá calcular o MIRR dos fluxos de caixa definidos na matriz `fluxoDeCaixa`, utilizando as taxas de financiamento e reinvestimento especificadas, e irá exibir o resultado em uma caixa de mensagem. Ajuste os valores da matriz e das taxas conforme necessário para sua situação específica.

facebooklinkedin