Gibt einen Double-Wert zurück, der den Zinssatz pro Zeitabschnitt einer Annuität angibt.
Syntax
Rate( ZZR , RMZ, BW [, ZW ] [, F ] [, Schätzwert ] )
Die Syntax der Funktion Rate weist die folgenden Argumente auf:
Argument |
Beschreibung |
ZZR |
Erforderlich. Double-Wert, der die Gesamtanzahl von Zahlungszeiträumen für die Annuität angibt. Wenn Sie beispielsweise monatliche Zahlungen für einen Autokredit mit vierjähriger Laufzeit leisten, umfasst Ihr Kredit insgesamt 4 * 12 (also 48) Zahlungszeiträume. |
pmt |
Erforderlich. Double-Wert, der die pro Zeitraum zu leistende Zahlung angibt. Die Zahlungen enthalten in der Regel Kreditsumme und Zinsen und ändern sich während der Laufzeit einer Annuität nicht. |
BW |
Erforderlich. Double-Wert, der den Barwert, also den heutigen Wert, einer Reihe zukünftiger Zahlungen oder Geldeingänge angibt. Wenn Sie beispielsweise einen Kredit für ein Auto aufnehmen, ist die Summe dieses Kredits für den Kreditgeber gleich dem Barwert der monatlichen Zahlungen, die Sie für das Auto leisten. |
ZW |
Optional. Variant-Wert, der den Endwert oder Kontostand angibt, der nach der letzten Zahlung erreicht sein soll. Der Endwert eines Kredits ist z. B. 0 Euro, da dies sein Wert nach der letzten Zahlung ist. Wenn Sie jedoch für die Ausbildung Ihrer Kinder 50.000 Euro in 18 Jahren ansparen möchten, entspricht der Endwert 50.000 Euro. Fehlt dieses Argument, wird 0 angenommen. |
type |
Optional. Variant-Wert, der angibt, wann Zahlungen fällig sind. Verwenden Sie 0, wenn die Zahlungen am Ende des Zahlungszeitraums fällig sind, oder verwenden Sie 1, wenn die Zahlungen am Anfang des Zeitraums fällig sind. Fehlt dieses Argument, wird 0 angenommen. |
Schätzwert |
Optional. Variant-Wert, der den Wert angibt, der Ihrer Schätzung zufolge von Rate zurückgegeben wird. Wird Schätzwert nicht angegeben, wird ein Schätzwert von 0,1 (10 Prozent) angenommen. |
Hinweise
Eine Annuität ist eine Reihe von konstanten Barzahlungen, die in einem Zeitraum geleistet werden. Eine Annuität kann ein Kredit (z. B. eine Eigenheimhypothek) oder eine Investition (z. B. eine monatliche Spareinlage) sein.
Für alle Argumente gilt, dass Geldbeträge, die ausgezahlt werden (etwa Spareinlagen), durch negative Zahlen und Geldbeträge, die eingenommen werden (etwa Dividenden), durch positive Zahlen dargestellt werden.
Rate wird mit Iteration berechnet. Die Berechnung fängt mit Schätzwert an und die Rate-Funktion rechnet solange, bis das Ergebnis auf 0,00001 Prozent genau ist. Falls die Rate-Funktion nicht innerhalb von 20 Durchläufen ein Ergebnis findet, tritt ein Fehler auf. Wenn Ihre Angabe für "Schätzwert" 10 Prozent ist und die Rate-Funktion fehlschlägt, versuchen Sie es mit einem anderen Wert für Schätzwert.
Abfragebeispiel
Ausdruck |
Ergebnisse |
SELECT FinancialSample.*, (Rate([TermInYears]*12,-[MonthlyRePayment],[LoanAmount],0,0,0.1)*12) AS InterestRate FROM FinancialSample; |
Gibt alle Felder aus der Tabelle "FinancialSample" und den jährlichen Zinssatz basierend auf "TermInYears", "MonthlyRePayment" und "LoanAmount" zurück und zeigt die Ergebnisse in der Spalte InterestRate an. |
VBA-Beispiel
Hinweis: Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerreferenz in der Dropdownliste neben Suchen aus, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.
In diesem Beispiel wird die Rate-Funktion verwendet, um den Zinssatz eines Kredits zu berechnen; gegeben sind die Gesamtzahl an Zahlungen (TotPmts), die Summe der Kreditzahlung (Payment), der aktuelle Wert oder die Tilgung des Kredits (PVal), der zukünftige Wert des Kredits (FVal), eine Zahl, die angibt, ob die Zahlung jeweils am Anfang oder am Ende des Zahlungszeitraums fällig ist (PayType) und eine Schätzung des erwarteten Zinssatzes (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."