LibreOffice 25.2 Βοήθεια
Υπολογίζει την καθαρή παρούσα αξία μιας επένδυσης, με βάση ένα παρεχόμενο προεξοφλητικό επιτόκιο και μια σειρά καταθέσεων και αναλήψεων.
NPV (Rate as Double, Values() as Double)
Double
Το Επιτόκιο είναι το προεξοφλητικό επιτόκιο για μια περίοδο.
Τιμές() είναι πίνακας που αναπαριστά καταθέσεις (θετικές τιμές) ή αναλήψεις (αρνητικές τιμές).
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 ' επιστρέφει 174,894967305331
End Sub