Bir dizi dönemsel nakit akışı (ödemeler ve makbuzlar) için iç getiri oranını belirten bir Çift döndürür.
Söz dizimi
IRR( values () [, guess ] )
İç_VERİm_ORANI işlevinin söz diziminde şu bağımsız değişkenler bulunur:
|
Bağımsız değişken |
Açıklama |
|
değerler () |
Gerekli. Çift dizisi, nakit akışı değerlerini belirtir. Dizi en az bir negatif değer (ödeme) ve bir de pozitif değer (alındı) içermelidir. |
|
tahmin |
İsteğe bağlı. Tahmin ettiğiniz değeri belirten değişken , IRR tarafından döndürülür. Belirtilmezse tahmin 0,1 'dir (yüzde 10). |
Notlar
İç getiri oranı, düzenli aralıklarla gerçekleşen ödemeler ve makbuzlardan oluşan bir yatırım için alınan faiz oranıdır.
İç_VERİm_ORASI işlevi, ödemelerin ve alış irsaliyelerinin sırasını yorumlamak için dizideki değerlerin sırasını kullanır. Ödeme ve alındı değerlerinizi doğru sırada girmeye dikkat edin. Her dönem için nakit akışının, bir ödeme için olduğu gibi sabit olması gerekmez.
İç_VERİm_ORASI yineleme ile hesaplanır. Tahmin değerinden başlayarak, sonuç yüzde 0,00001 içinde doğru olana kadar IRR hesaplamada döngü oluşturur. İç_VERİm_ORASI 20 denemeden sonra bir sonuç bulamazsa başarısız olur.
Örnek
Not: Aşağıdaki örneklerde, bu işlevin Visual Basic for Applications (VBA) modülünde kullanımı gösterilir. VBA ile çalışma hakkında daha fazla bilgi için, rama'nın yanındaki açılan listede Geliştirici Başvurusu'nu seçin ve arama kutusuna bir veya birden çok terim yazın.
Bu örnekte, İç_VERİm_ORANI işlevi Values()dizisinde yer alan 5 nakit akışı serisi için iç verim oranını döndürür. İlk dizi öğesi, iş başlangıç maliyetlerini temsil eden negatif bir nakit akışıdır. Kalan 4 nakit akışı, sonraki 4 yıl için pozitif nakit akışlarını temsil eder. Guess tahmini iç getiri oranıdır.
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.
