Restituisce un valore Double che specifica il tasso di rendimento interno modificato per una serie di flussi di cassa periodici (entrate e uscite).
Sintassi
TIR.VAR( valori (); tasso_finanz; tasso_reinv)
La sintassi della funzione TIR.VAR ha gli argomenti seguenti:
|
Argomento |
Descrizione |
|
valori () |
Obbligatorio. Matrice di valori Double che specifica i valori di flusso di cassa. La matrice deve contenere almeno un valore negativo (un pagamento) e uno positivo (un incasso). |
|
tasso_finanz |
Obbligatorio. Valore Double che specifica il tasso di interesse pagato come costo del finanziamento. |
|
tasso_reinv |
Obbligatorio. Valore Double che specifica il tasso di interesse attivo sugli utili di un reinvestimento. |
Osservazioni
Il tasso di rendimento interno modificato è il tasso di rendimento interno nel caso in cui le entrate e le uscite siano finanziate a tassi diversi. La funzione TIR.VAR calcola sia il costo dell'investimento (tasso_finanz) sia il tasso di interesse sugli utili del reinvestimento (tasso_reinv).
Gli argomenti tasso_finanz e tasso_reinv sono percentuali espresse come valori decimali. Ad esempio, 12% viene espresso come 0,12.
La funzione TIR.VAR usa l'ordine dei valori nella matrice per interpretare l'ordine dei pagamenti e degli incassi. I valori dei pagamenti e degli incassi devono quindi essere immessi nella sequenza corretta.
Esempio
Nota: Gli esempi seguenti illustrano l'uso di questa funzione in un modulo di Visual Basic, Applications Edition (VBA). Per altre informazioni sull'uso di VBA, selezionare Riferimenti per sviluppatori nell'elenco a discesa accanto a Cerca e immettere uno o più termini nella casella di ricerca.
In questo esempio viene usata la funzione TIR.VAR per restituire il tasso di rendimento interno modificato per una serie di flussi di cassa contenuti nella matrice Values(). LoanAPR rappresenta l'interesse del finanziamento mentre InvAPR rappresenta il tasso di interesse ricevuto sul reinvestimento.
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
