NBW-Funktion
Gibt ein Double-Element zurück, das den aktuellen Nettowert einer Investition auf Basis regelmäßiger Cashflows (Ausgaben und Einnahmen) sowie einen Abzinsungssatz angibt.
Syntax
NPV(rate, values( ))
Die NPV-Funktion weist folgende benannte Argumente auf:
| Bestandteil | Beschreibung |
|---|---|
| rate | Erforderlich. Double , der den Abzinsungssatz über die Dauer des Zeitraums angibt, ausgedrückt als Dezimalzahl. |
| values( ) | Erforderlich. Ein Array von Double-Werten, das Cashflow-Werte angibt. Das Array muss mindestens einen negativen (Zahlung) und einen positiven Wert (Geldeingang) enthalten. |
Hinweise
Der aktuelle Nettowert einer Investition entspricht dem aktuellen Wert zukünftiger Ausgaben und Einnahmen.
Bei der NPV-Funktion wird die Reihenfolge der Werte innerhalb des Arrays verwendet, um die Reihenfolge der Ausgaben und Einnahmen zu interpretieren. Geben Sie die Werte Ihrer Einnahmen und Ausgaben deshalb unbedingt in der richtigen Reihenfolge ein.
Die NPV-Investition beginnt eine Periode vor dem Datum des ersten Cashflowwerts und endet mit dem letzten Cashflowwert im Array.
Die Berechnung des aktuellen Nettowerts basiert auf zukünftigen Cashflows. Wenn Ihr erster Cashflow zu Beginn des ersten Zeitraums auftritt, muss der erste Wert dem von NPV zurückgegebenen Wert hinzugefügt werden und darf nicht in den Cashflowwerten von values( ) enthalten sein.
Die NPV-Funktion ähnelt der PV-Funktion (Barwert), mit der Ausnahme, dass die PV-Funktion zulässt, dass Cashflows entweder am Ende oder am Anfang eines Zeitraums beginnen können. Im Gegensatz zu den variablen NPV-Cashflowwerten müssen PV-Cashflowwerte bei der gesamten Investition fix sein.
Beispiel
In diesem Beispiel wird die NPV -Funktion verwendet, um den aktuellen Nettowert für eine Reihe an Cashflows im Array Values() zurückzugeben.
RetRate steht für den festen internen Zinsfuß.
Dim Fmt, Guess, RetRate, NetPVal, Msg
Static Values(5) As Double ' Set up array.
Fmt = "###,##0.00" ' Define money format.
Guess = .1 ' Guess starts at 10 percent.
RetRate = .0625 ' Set fixed internal rate.
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
NetPVal = NPV(RetRate, Values()) ' Calculate net present value.
Msg = "The net present value of these cash flows is "
Msg = Msg & Format(NetPVal, Fmt) & "."
MsgBox Msg ' Display net present value.
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.