Geeft als resultaat een waarde van het type Double die de gewijzigde interne rentabiliteit aangeeft van een reeks periodieke geldstromen (betalingen en ontvangsten).
Syntaxis
GIR(waarden (), finance_rate, reinvest_rate)
De syntaxis van de functie GIR heeft deze argumenten:
| Argument | Beschrijving |
|---|---|
| waarden () | Vereist. Matrix van Double waarmee geldstroomwaarden worden aangegeven. De matrix moet ten minste één negatieve waarde (een betaling) en één positieve waarde (een ontvangst) bevatten. |
| finance_rate | Vereist. Dubbele specificatie van de betaalde rente als financieringskosten. |
| reinvest_rate | Vereist. Dubbele specificatie van de rente die is ontvangen op winsten uit herbelegging in contanten. |
Opmerkingen
De gewijzigde interne rentabiliteit is de interne rentabiliteit wanneer betalingen en ontvangsten tegen verschillende rentevoeten worden gefinancierd. De functie GIR houdt rekening met zowel de investeringskosten (finance_rate) als het rentepercentage dat wordt ontvangen over de herinvestering van geld (reinvest_rate).
De argumenten finance_rate en reinvest_rate zijn percentages die worden uitgedrukt als decimale waarden. 12 procent wordt bijvoorbeeld uitgedrukt als 0,12.
De functie GIR gebruikt de volgorde van waarden binnen de matrix om de volgorde van betalingen en ontvangsten te interpreteren. Voer de waarden voor betalingen en ontvangen daarom in de juiste volgorde in.
Voorbeeld
Opmerking
In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht. Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.
In dit voorbeeld wordt de functie GIR gebruikt om de gewijzigde interne rentabiliteit te retourneren voor een reeks cashflows in de matrix Values().
LoanAPR Vertegenwoordigt de financieringsrente en InvAPR het rentepercentage dat wordt ontvangen over herinvestering.
Dim LoanAPR, InvAPR, Fmt, RetRate, Msg
Static Values(5) As Double ' Set up array.
LoanAPR = .1 ' Loan rate.
InvAPR = .12 ' Reinvestment rate.
Fmt = "#0.00" ' Define money 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 = MIRR(Values(), LoanAPR, InvAPR)
Msg = "The modified internal rate of return " & _
"for these five cash flows is"
Msg = Msg & Format(Abs(RetRate) * 100, Fmt) & "%."
' Display internal return rate.
MsgBox Msg