Pomoč LibreOffice 24.8
Neto sedanja vrednost naložbe. Izračuna neto sedanjo vrednost naložbe na osnovi podane diskontne stopnje ter niza periodičnih plačil in dvigov.
NPV (Rate as Double, Values() as Double)
Double
Mera je diskontna mera za obdobje.
Vrednosti() je polje vrednosti, ki predstavljajo pologe (pozitivne vrednosti) ali dvige (negativne vrednosti).
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 ' vrne 174,894967305331
End Sub