Επιστρέφει Double που καθορίζει τον αριθμό των περιόδων για μια πρόσοδο με βάση περιοδικές, σταθερές πληρωμές και σταθερό επιτόκιο.

Σύνταξη

NPer(rate, pmt, pv[, fv[, type]])

Η συνάρτηση NPer έχει τα εξής επώνυμα ορίσματα:

Μέρος Περιγραφή
rate Απαιτείται. Double που καθορίζει το επιτόκιο ανά περίοδο. Για παράδειγμα, εάν πάρετε δάνειο για αγορά αυτοκινήτου με ετήσιο ποσοστό 10 τοις εκατό και πραγματοποιείτε μηνιαίες πληρωμές, το επιτόκιο ανά περίοδο είναι 0.1/12, ή 0.0083.
pmt Απαιτείται. Double που καθορίζει την πληρωμή που πρόκειται να πραγματοποιηθεί κάθε περίοδο. Οι πληρωμές συνήθως περιλαμβάνουν το αρχικό κεφάλαιο και τον τόκο που δεν αλλάζει κατά τη διάρκεια της ζωής μιας προσόδου.
pv Απαιτείται. Double που καθορίζει την παρούσα αξία, ή τη σημερινή αξία, μιας σειράς από μελλοντικές πληρωμές ή εισπράξεις. Για παράδειγμα, όταν δανείζεστε χρήματα για να αγοράσετε ένα αυτοκίνητο, το ποσό του δανείου είναι η παρούσα αξία, για το δανειστή, των μηνιαίων πληρωμών που θα πραγματοποιείτε για το αυτοκίνητο.
fv Προαιρετικό. Variant που καθορίζει την μελλοντική αξία ή το χρηματικό υπόλοιπο που θέλετε αφού θα έχει πραγματοποιηθεί  η τελευταία πληρωμή. Για παράδειγμα, η μελλοντική αξία ενός δανείου είναι $0 διότι αυτή είναι η αξία του μετά την τελευταία πληρωμή. Ωστόσο, εάν θέλετε να αποταμιεύσετε $50,000 σε διάστημα 18 ετών για την εκπαίδευση των παιδιών σας, τότε η μελλοντική αξία είναι $50,000. Εάν παραλειφθεί, θεωρείται ότι είναι 0.
type Προαιρετικό. Variant που καθορίζει πότε αναμένονται οι πληρωμές. Χρησιμοποιήστε το 0 εάν οι πληρωμές πρέπει να γίνονται στο τέλος κάθε περιόδου πληρωμής, ή χρησιμοποιήστε το 1 εάν οι πληρωμές πρέπει να γίνονται στην αρχή κάθε περιόδου πληρωμών. Εάν παραλειφθεί, θεωρείται ότι είναι 0.
Παρατηρήσεις

Πρόσοδος είναι μια σειρά από σταθερές πληρωμές που πραγματοποιούνται στη διάρκεια μιας χρονικής περιόδου. Η πρόσοδος μπορεί να είναι δάνειο (π.χ. στεγαστικό δάνειο) ή επένδυση (π.χ. πλάνο μηνιαίας αποταμίευσης).
Για όλα τα ορίσματα, οι εκταμιεύσεις (όπως καταθέσεις σε αποταμιεύσεις) αναπαριστώνται με αρνητικούς αριθμούς. Οι εισπράξεις (όπως επιταγές μερισμάτων) αναπαριστώνται με θετικούς αριθμούς.

Στο παράδειγμα αυτό χρησιμοποιείται η συνάρτηση NPer για τον υπολογισμό του αριθμού των περιόδων στη διάρκεια των οποίων πρέπει να πραγματοποιούνται πληρωμές για την αποπληρωμή ενός δανείου, του οποίου η αξία περιέχεται στη μεταβλητή Αξία1. Παρέχονται επίσης το επιτόκιο ανά περίοδο (Επιτόκιο / 12), η πληρωμή (Πληρωμή), η μελλοντική αξία του δανείου (Αξία2), και ένας αριθμός που δηλώνει αν η πληρωμή πραγματοποιείται στην αρχή ή στο τέλος της κάθε περιόδου πληρωμής (Τύπος_πληρωμής).

Dim Αξία2, Αξία1, Επιτόκιο, Πληρωμή, Τύπος_πληρωμής, Αρ_πληρωμών
Const ΤΕΛΟΣ_ΠΕΡΙΟΔΟΥ = 0, ΑΡΧΗ_ΠΕΡΙΟΔΟΥ = 1 ' Πότε πραγματοποιούνται οι πληρωμές.
Αξία2 = 0 ' Συνήθως 0 για δάνειο.
Αξία1 = InputBox("Πόσα χρήματα θέλετε να δανειστείτε;")
Επιτόκιο = InputBox("Ποιο είναι το ετήσιο επιτόκιο του δανείου σας;")
If Επιτόκιο > 1 Then Επιτόκιο = Επιτόκιο / 100 ' Εξασφάλιση κατάλληλης μορφής.

Πληρωμή = InputBox("Πόσα χρήματα θέλετε να πληρώνετε μηνιαίως;")
Τύπος_πληρωμής = MsgBox("Πραγματοποιείτε τις πληρωμές στο τέλος κάθε μήνα;", vbYesNo)
If Τύπος_πληρωμής = vbNo Then Τύπος_πληρωμής = ΑΡΧΗ_ΠΕΡΙΟΔΟΥ Else Τύπος_πληρωμής = ΤΕΛΟΣ_ΠΕΡΙΟΔΟΥ
Αρ_πληρωμών = NPer(Επιτόκιο / 12, -Πληρωμή, Αξία1, Αξία2, Τύπος_πληρωμής)
If Int(Αρ_πληρωμών) <> Αρ_πληρωμών Then Αρ_πληρωμών = Int(Αρ_πληρωμών) + 1

MsgBox "Θα χρειαστείτε " & Αρ_πληρωμών & " μήνες για την αποπληρωμή του δανείου σας."