Returnerer et langt flyttall som angir internrenten for en serie periodiske kontantstrømmer (betalinger og inntekter).

Syntaks

IR( values () [, guess ] )

Syntaksen for funksjonen IR har disse argumentene:

Argument

Beskrivelse

verdier ()

Obligatorisk. Matrise med langt flyttall som angir kontantstrømverdier. Matrisen må inneholde minst én negativ verdi (en betaling) og én positiv verdi (en inntekt).

Antatt

Valgfritt. Variant som angir verdien du beregner, returneres av IR. Hvis argumentet er utelatt, er anlagt 0,1 (10 prosent).


Kommentarer

Internrenten er rentesatsen på en investering som består av innbetalinger og inntekter som skjer med regelmessige intervaller.

IR-funksjonen bruker rekkefølgen på verdiene i matrisen til å tolke rekkefølgen på betalinger og inntekter. Pass på at du setter inn betalingene og inntektene i riktig rekkefølge. Kontantstrømmen for hver periode trenger ikke å være fast, som for en annuitet.

IR beregnes ved iterasjon. Fra og med verdien av an antarkretser IR gjennom beregningen til resultatet er nøyaktig innenfor 0,00001 prosent. Hvis IR ikke finner et resultat etter 20 forsøk, mislykkes det.

Eksempel

Obs!: I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications). Hvis du vil ha mer informasjon om hvordan du arbeider med VBA, velger du Utviklerreferanse fra rullegardinlisten ved siden av Søk og skriver inn ett eller flere søkeord i søkeboksen.

I dette eksemplet returnerer IR-funksjonen internrenten for en serie med fem kontantstrømmer i matrisen Values(). Det første matriseelementet er en negativ kontantstrøm som representerer oppstartskostnader for virksomheten. De fire gjenværende kontantstrømmene representerer positive kontantstrømmer de påfølgende fire årene. Guess er den beregnede interne returraten.

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.

Trenger du mer hjelp?

Utvid ferdighetene dine
Utforsk opplæring
Vær først ute med de nye funksjonene
Bli med i Microsoft Office Insider-deltakere

Var denne informasjonen nyttig?

Hvor fornøyd er du med språkkvaliteten?
Hva påvirket opplevelsen din?

Takk for tilbakemeldingen!

×