Función NPV [VBA]

Calcula el valor presente neto de una inversión, basándose en la tasa de descuento que se proporcione, así como en una serie de depósitos y retiros.

Icono de advertencia

Esta función o constante se activa por medio de la instrucción Option VBASupport 1, colocada antes del código del programa ejecutable de algún módulo.


Sintaxis:

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

Valor de retorno:

Double

Parámetros:

Tasa es la tasa de interés de un período.

Valores() es una matriz que representa depósitos (valores positivos) o retiros (valores negativos).

Códigos de error:

5 Llamada a procedimiento no válida

Ejemplo:

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 ' devuelve 174,894967305331

End Sub