Funkcija IRR

Primjenjuje se na
Access za Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Vraća dvostruku vrijednost koja određuje internu stopu povrata za niz periodičnih novčanih tokova (uplata i računa).

Sintaksa

IRR(vrijednosti () [, procjena ] )

Sintaksa funkcije IRR sadrži ove argumente:

Argument Opis
Vrijednosti () Obavezno. Polje Dvostruke vrijednosti novčanog toka. Polje mora sadržavati barem jednu negativnu vrijednost (uplatu) i jednu pozitivnu vrijednost (račun).
pogodi Neobavezno. Vrijednost koja određuje varijantu koju procjenjujete vratit će IRR. Ako je izostavljen, procjena je 0,1 (10%).

    

Napomene

Interna stopa povrata je kamatna stopa primljena za ulaganje koje se sastoji od plaćanja i primitaka koji se događaju u redovitim intervalima.

Funkcijom IRR redoslijed uplata i računa interpretira se na temelju redoslijeda vrijednosti unutar polja. Provjerite jeste li unijeli vrijednosti uplate i računa ispravnim redoslijedom. Protok novca za svako razdoblje ne mora biti fiksan, kao što je to slučaj kod anuiteta.

IRR se računa iteracijom. Počevši od vrijednosti procjene, IRR kruži kroz izračun sve dok točnost rezultata nije točno s odstupanjem od 0,00001 posto. Ako IRR ne može pronaći rezultat nakon 20 pokušaja, ne uspijeva.

Primjer

Napomena

Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom primjeru funkcija IRR vraća internu stopu profitabilnosti za niz od 5 novčanih tokova u polju Values(). Prvi element polja negativni je protok novca koji predstavlja troškove pokretanja poslovanja. Preostala 4 protoka novca predstavljaju pozitivne protoke novca za sljedeće 4 godine. Guess procijenjena interna stopa povrata.

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.