Função NPV [VBA]

Calcula o Valor Presente Líquido de um investimento, baseado na taxa de desconto fornecida, e uma série de depósitos e retiradas.

warning

Esta constante, função ou objeto se ativa com a instrução Option VBASupport 1 colocada antes do código executável do programa em um módulo.


Sintaxe:


NPV (Rate as Double, Values() as Double)

Valor de retorno:

Double

Parâmetros:

Taxa é a taxa de desconto para um período.

Valores é uma matriz que representa depósitos (valores positivos) ou retiradas (valores negativos).

Códigos de erro:

5 Chamada de procedimento inválida

Exemplo:


REM ***** BASIC *****
Option VBASupport 1
Sub ExampleNPV
 Dim r As Double
 Dim pValues(5) as Double
 pValues(0) = 100
 pValues(1) = 100
 pValues(2) = 100
 pValues(3) = -300
 pValues(4) = 100
 pValues(5) = 100
 r = 0.06
 p = NPV( r, pValues)
 Print p ' retorna 174,894967305331
End Sub

♥ Doe para nosso projeto! ♥