Vrátí hodnotu Double určující čistou současnou hodnotu investice vypočítanou na základě série pravidelných peněžních toků (plateb a příjmů) a diskontní sazby.
Syntaxe
NPV(sazba, hodnoty () )
Syntaxe funkce ČISTÁ.SOUČHODNOTA má tyto argumenty:
| Argument | Popis |
|---|---|
| Sazba | Povinný argument. Hodnota Double určující diskontní sazbu vztaženou k délce období vyjádřená desetinným číslem. |
| hodnoty () | Povinný argument. Matice hodnot Double určující hodnoty peněžních toků. Matice musí obsahovat aspoň jednu zápornou hodnotu (platba) a jednu kladnou hodnotu (příjem). |
Poznámky
Čistou současnou hodnotou investice je aktuální hodnota budoucí řady plateb a příjmů.
Funkce ČISTÁ.SOUČHODNOTA funkce používá pořadí hodnot v matici k interpretaci pořadí plateb a příjmů. Platby a příjmy je nutné zadat ve správném pořadí.
Investice ČISTÁ.SOUČHODNOTA začíná jedno období před datem první hodnoty peněžního toku a končí poslední hodnotou peněžního toku v matici.
Výpočet čisté současné hodnoty je založen na budoucích peněžních tocích. Pokud k prvnímu peněžnímu toku dojde na začátku prvního období, musí být první hodnota přidána k hodnotě vrácené hodnotou NPV a nesmí být zahrnuta do hodnot peněžního toku hodnot hodnot( ).
Funkce ČISTÁ.SOUČHODNOTA je podobná funkci SOUČV (současná hodnota) s tím rozdílem, že funkce PV umožňuje, aby peněžní toky začínaly na konci nebo na začátku období. Na rozdíl od proměnných hodnot peněžního toku NPV musí být peněžní toky pv fixní po celou dobu investice.
Příklad
Poznámka
Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.
Tento příklad používá funkci NPV k vrácení čisté současné hodnoty pro řadu peněžních toků obsažených v poli Values().
RetRate představuje pevnou vnitřní výnosnost.
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
' Calculate net present value.
NetPVal = NPV(RetRate, Values())
Msg = "The net present value " & _
"of these cash flows is "
Msg = Msg & Format(NetPVal, Fmt) & "."
' Display net present value.
MsgBox Msg