Συνάρτηση Rate

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

Σύνταξη

Rate(αριθμός_περιόδων; πληρωμή;παρούσα_αξία [, μελλοντική_αξία ] [, τύπος ] [, εκτίμηση] )

Η σύνταξη της συνάρτησης Rate περιλαμβάνει τα παρακάτω ορίσματα:

Επιχείρημα	Περιγραφή
Nper	Υποχρεωτικό. Διπλός καθορισμός του συνολικού αριθμού περιόδων πληρωμής της προσόδου. Για παράδειγμα, εάν κάνετε μηνιαίες πληρωμές για ένα τετραετές δάνειο αυτοκινήτου, το δάνειό σας έχει συνολικά 4 * 12 (ή 48) περιόδους πληρωμής.
Pmt	Υποχρεωτικό. Διπλής ακρίβειας που καθορίζει την πληρωμή που πρέπει να καταβάλλεται σε κάθε περίοδο. Πληρωμές συνήθως περιέχουν κεφάλαιο και ενδιαφέρον που δεν αλλάζει κατά τη διάρκεια της προσόδου.
Pv	Υποχρεωτικό. Καθορισμός διπλής αξίας, ή σημερινής αξίας, μιας σειράς μελλοντικών πληρωμών ή αποδείξεων. Για παράδειγμα, όταν δανείζεστε χρήματα για να αγοράσετε ένα αυτοκίνητο, το ποσό του δανείου είναι η παρούσα αξία για τον δανειστή των μηνιαίων πληρωμών αυτοκινήτων που θα κάνετε.
Fv	Προαιρετικό. Μεταβλητή που καθορίζει τη μελλοντική αξία ή το υπόλοιπο μετρητών που θέλετε αφού ολοκληρώσετε την τελική πληρωμή. Για παράδειγμα, η μελλοντική αξία ενός δανείου είναι 0 $, επειδή αυτή είναι η αξία του μετά την τελική πληρωμή. Ωστόσο, εάν θέλετε να εξοικονομήσετε 50.000 $ για περισσότερα από 18 χρόνια για την εκπαίδευση του παιδιού σας, τότε τα 50.000 $ είναι η μελλοντική αξία. Εάν παραλειφθεί, λαμβάνεται το 0.
Πληκτρολογήστε	Προαιρετικό. Μεταβλητή που καθορίζει έναν αριθμό που υποδεικνύει πότε πρέπει να καταβάλλονται οι πληρωμές. Χρησιμοποιήστε την τιμή 0 εάν οι πληρωμές καταβάλλονται στο τέλος της περιόδου πληρωμής ή χρησιμοποιήστε την 1 εάν οι πληρωμές καταβάλλονται στην αρχή της περιόδου. Εάν παραλειφθεί, λαμβάνεται το 0.
Μαντέψει	Προαιρετικό. Η μεταβλητή που καθορίζει την τιμή που εκτιμάτε θα επιστραφεί από την τιμή Χρέωση. Εάν παραλειφθεί, το όρισμα εκτίμηση είναι 0,1 (10 τοις εκατό).

Παρατηρήσεις

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

Για όλα τα ορίσματα, τα ποσά που καταβάλλονται (όπως οι καταθέσεις σε αποταμιεύσεις) αντιπροσωπεύονται από αρνητικούς αριθμούς. τα εισπραχθέντα μετρητά (όπως οι έλεγχοι μερισμάτων) αντιπροσωπεύονται από θετικούς αριθμούς.

Ο ρυθμός υπολογίζεται με επανάληψη. Ξεκινώντας με την τιμή του ορίζετε, η συνάρτηση Rate εκτελεί κύκλους στον υπολογισμό μέχρι το αποτέλεσμα να είναι ακριβές στο 0,00001 τοις εκατό. Εάν η συνάρτηση Rate δεν μπορεί να βρει αποτέλεσμα μετά από 20 προσπάθειες, αποτυγχάνει. Εάν η εκτίμηση είναι 10 τοις εκατό και η τιμή "Επιτόκιο " αποτύχει, δοκιμάστε μια διαφορετική τιμή για το όρισμα εκτίμηση.

Παράδειγμα ερωτήματος

Έκφραση	Αποτελέσματα
SELECT FinancialSample.*, (Rate([TermInYears]*12;-[MonthlyRePayment];[LoanAmount];0;0;0.1)*12) AS InterestRate FROM FinancialSample;	Επιστρέφει όλα τα πεδία από τον πίνακα "FinancialSample" και το ετήσιο "Επιτόκιο" με βάση τους όρους "TermInYears", "MonthlyRePayment" και "LoanAmount" και εμφανίζει τα αποτελέσματα στη στήλη InterestRate.

Παράδειγμα VBA

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση Rate για να υπολογίσει το επιτόκιο ενός δανείου, δεδομένου του συνολικού αριθμού πληρωμών (TotPmts), του ποσού της πληρωμής του δανείου (Payment), της παρούσας αξίας ή του κεφαλαίου του δανείου (PVal), της μελλοντικής αξίας του δανείου (FVal), ενός αριθμού που υποδεικνύει εάν η πληρωμή πρέπει να καταβληθεί στην αρχή ή στο τέλος της περιόδου πληρωμής (PayType), και προσέγγιση του αναμενόμενου επιτοκίου (Guess).

Dim Fmt, FVal, Guess, PVal
Dim Payment, TotPmts, PayType, APR
' When payments are made.
Const ENDPERIOD = 0, BEGINPERIOD = 1    
Fmt = "##0.00"    ' Define percentage format.
FVal = 0    ' Usually 0 for a loan.
Guess = .1    ' Guess of 10 percent.
PVal = InputBox("How much did you borrow?")
Payment = InputBox("What's your monthly payment?")
TotPmts = InputBox("How many monthly payments do " & _
          "you have to make?")
PayType = MsgBox("Do you make payments at the end " & _
          "of the month?", vbYesNo)
If PayType = vbNo Then 
    PayType = BEGINPERIOD 
    Else PayType = ENDPERIOD
End If
APR = (Rate(TotPmts, -Payment, PVal, _
      FVal, PayType, Guess) * 12) * 100
MsgBox "Your interest rate is " & _
    Format(CInt(APR), Fmt) & " percent."