Vrátí hodnotu Double určující vnitřní výnosnost série pravidelných peněžních toků (plateb a příjmů).
Syntaxe
MÍRA.VÝNOSNOSTI(hodnoty () [, odhad ] )
Syntaxe funkce MÍRA.VÝNOSNOSTI obsahuje tyto argumenty:
| Argument | Popis |
|---|---|
| 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). |
| odhad | Nepovinný argument. Proměnná určující hodnotu, kterou odhadnete, vrátí funkce IRR. Pokud tento argument vynecháte, je odhad 0,1 (10 procent). |
Poznámky
Vnitřní výnosové procento je úroková sazba získaná za investici sestávající z plateb a příjmů, které probíhají v pravidelných intervalech.
Funkce MÍRA.VÝNOSNOSTI 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í. Peněžní tok pro každé období nemusí být pevný, jako je tomu u anuity.
MÍRA.VÝNOSNOSTI se počítá iterací. Počínaje hodnotou odhad bude funkce MÍRA.VÝNOSNOSTI cyklicky vypočítávat, dokud nebude výsledek přesný s přesností na 0,00001 procenta. Pokud funkce MÍRA.VÝNOSNOSTI nenajde výsledek ani po 20 pokusech, selže.
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.
V tomto příkladu vrátí funkce MÍRA.VÝNOSNOSTI vnitřní výnosnost pro sérii 5 peněžních toků obsažených v matici Values(). První prvek matice je záporný peněžní tok představující počáteční náklady podniku. Zbývající 4 peněžní toky představují kladné peněžní toky pro následující 4 roky.
Guess je odhadovaná vnitřní míra výnosnosti.
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
' Calculate internal rate.
RetRate = IRR(Values(), Guess) * 100
Msg = "The internal rate of return for these " & _
"five cash flows is "
Msg = Msg & Format(RetRate, Fmt) & " percent."
MsgBox Msg ' Display internal return rate.