Applies ToAccess til Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Returnerer en dobbelt, der angiver den interne rente for en række periodiske pengestrømme (betalinger og kvitteringer).

Syntaks

IA( værdier () [, gæt ] )

Syntaksen for funktionen IA har disse argumenter:

Argument

Beskrivelse

værdier ()

Påkrævet. Matrix med Dobbelt reelt tal, der angiver pengestrømsværdier. Matrixen skal indeholde mindst én negativ værdi (en betaling) og én positiv værdi (en indgående betaling).

Gæt

Valgfrit. Variant, der angiver den værdi, du anslår, returneres af IA. Hvis det udelades, er gæt 0,1 (10 procent).

Bemærkninger

Det interne afkast er den rente, der modtages for en investering bestående af betalinger og indtægter, der forekommer med jævne mellemrum.

Funktionen IA anvender rækkefølgen af værdier i matrixen til at fortolke rækkefølgen af udgående og indgående betalinger. Sørg for at angive værdierne for udgående og indgående betalinger i den rigtige rækkefølge. Pengestrømmen for hver periode behøver ikke at blive fast, da det er for en annuitet.

IA beregnes ved gentagelse. Fra og med værdien af gæt bladrer IRR gennem beregningen, indtil resultatet er nøjagtigt inden for 0,00001 procent. Hvis IA ikke kan finde et resultat efter 20 forsøg, mislykkes det.

Eksempel

Bemærk!: Følgende eksempler demonstrerer brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Hvis du vil have mere at vide om at arbejde med VBA, skal du vælge Udviklerreference på rullelisten ud for Søg og skrive ét eller flere ord i søgefeltet.

I dette eksempel returnerer funktionen IA den interne rente for en serie på 5 pengestrømme, der er indeholdt i matrixen Values(). Det første matrixelement er en negativ pengestrøm, der repræsenterer startomkostninger for virksomheden. De resterende 4 pengestrømme repræsenterer positive pengestrømme for de efterfølgende 4 år. Guess er den anslåede interne rente.

Dim Guess, Fmt, RetRate, MsgStatic 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) = 25000Values(3) = 28000 : Values(4) = 31000' Calculate internal rate.RetRate = IRR(Values(), Guess) * 100Msg = "The internal rate of return for these " & _      "five cash flows is "Msg = Msg & Format(RetRate, Fmt) & " percent."MsgBox Msg    ' Display internal return rate.

Har du brug for mere hjælp?

Vil du have flere indstillinger?

Udforsk abonnementsfordele, gennemse kurser, få mere at vide om, hvordan du sikrer din enhed og meget mere.

Communities hjælper dig med at stille og besvare spørgsmål, give feedback og høre fra eksperter med omfattende viden.