Bir dönemsel nakit akışı serisinin iç verim oranını (ödemeler ve alındılar) belirten Çift döndürür.
Söz dizimi
D_D_D_D3 (değerler () [, tahmin ] )
D_RR işlevinin söz dizim bölümünde aşağıdaki bağımsız değişkenler vardır:
|
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 etmek istediğiniz değeri belirten değişken, T_SAYI_DEĞERİ tarafından döndürülür. Atlanırsa, tahmin 0,1 (yüzde 10) olabilir. |
Notlar
İç verim oranı, düzenli aralıklarla yapılan ödemelerden ve alındılardan oluşan bir yatırım için alınan faiz oranıdır.
İlk_PARA_ÖDEMEİ işlevi, ödemelerin ve alındıların sıralarını yorumlamak için dizi içindeki değerlerin sıralamaları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 sabit olması gerekmemektedir çünkü bir yıllık ödemedir.
İ_RR yinelemeyle hesaplanır. Tahmin değeriyle başlayarak,IRR sonucu yüzde 0,00001 içinde doğru olana kadar hesaplamayı döngüye alar.20 denemeden sonra IRR sonucu 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, İç__OR_İÇ_ORAN işlevi, verim dizisinde yer alan 5 nakit akışı serisi için iç verim oranını Values(). İlk dizi öğesi, işletme 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 ediyor. Guess , tahmini iç verim 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.
