Fonction NPV [VBA]

Calcul la valeur actuelle nette d'un investissement, basée sur un taux d'actualisation fourni, et une série de dépôts et de retraits.

warning

Cette fonction ou constante est activée avec l'instruction Option VBASupport 1 placée dans un module avant le code exécutable.


Syntaxe :


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

Valeur de retour :

Double

Paramètres :

taux représente le taux d'escompte pour une période.

Valeurs() est une matrice que représente les dépôts (valeurs positives) et les retraits (valeurs négatives).

Codes d'erreur :

5 appel de procédure incorrect

Exemple :


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 ' renvoie 174,894967305331
End Sub