IKV-Funktion
Gibt einen Double-Wert zurück, der den internen Zinssatz für eine Reihe periodischer Cashflows (Zahlungen und Eingänge) angibt.
Syntax
IRR(values(), [ guess ])
Die IRR-Funktion umfasst die folgenden benannten Argumente:
| Bestandteil | Beschreibung |
|---|---|
| values() | Erforderlich. Ein Array von Double-Werten, das Cashflow-Werte angibt. Das Array muss mindestens einen negativen (Zahlung) und einen positiven Wert (Geldeingang) enthalten. |
| schätze | Optional. Variante , die den Wert angibt, den Sie schätzen, wird von IRR zurückgegeben. Wenn guess nicht angegeben wird, wird ein Schätzwert von 0,1 (10 Prozent) angenommen. |
Hinweise
Der interne Zinssatz ist der Zinssatz, der für eine Investition aus Zahlungen und Eingängen empfangen wird, die in regelmäßigen Abständen auftreten.
Die IRR-Funktion interpretiert die Reihenfolge der Zahlungen und Eingänge anhand der Reihenfolge der Werte im Array. Stellen Sie sicher, dass Sie die Zahlungs- und Eingangswerte in der richtigen Reihenfolge eingeben. Der Cashflow braucht nicht für jede Periode festgesetzt zu werden, da er für eine Annuität gilt.
IRR wird per Iteration berechnet. Die IRR-Funktion beginnt mit dem Wert von guess und durchläuft die Berechnung so lange, bis das Ergebnis auf 0,00001 Prozent genau ist. Wenn IRR nach 20 Versuchen zu keinem Ergebnis kommt, liegt ein Fehler vor.
Beispiel
In diesem Beispiel gibt die IRR -Funktion den internen Zinssatz für eine Reihe von 5 im Array Values() enthaltenen Cashflows zurück. Das erste Array-Element ist ein negativer Cashflow für Geschäftsgründungskosten. Die verbleibenden vier Cashflows stellen positive Cashflows für die folgenden vier Jahre dar.
Guess ist der geschätzte interne Zinssatz.
Dim Guess, Fmt, RetRate, Msg
Static Values(5) As Double ' Set up array.
Guess = .1 ' Guess starts at 10 percent.
Fmt = "#0.00" ' Define percentage format.
Values(0) = -70000 ' Business start-up costs.
' Positive cash flows reflecting income for four successive years.
Values(1) = 22000 : Values(2) = 25000
Values(3) = 28000 : Values(4) = 31000
RetRate = IRR(Values(), Guess) * 100 ' Calculate internal rate.
Msg = "The internal rate of return for these five cash flows is "
Msg = Msg & Format(RetRate, Fmt) & " percent."
MsgBox Msg ' Display internal return rate.
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.