Función TIR

Se aplica a
Access para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Devuelve un Doble que especifica la tasa interna de retorno para una serie de flujos periódicos de efectivo (pagos y recibos).

Sintaxis

TIR(values () [, guess ] )

La sintaxis de la función TIR tiene los siguientes argumentos:

Argumento Descripción
values () Obligatorio. Matriz de doble que especifica valores de flujo de efectivo. La matriz debe contener al menos un valor negativo (un pago) y un valor positivo (un recibo).
adivina Opcional. La TIR devolverá el valor específico de la variante que estima. Si se omite, la conjetura es 0,1 (10 por ciento).

    

Observaciones

La tasa interna de rendimiento es la tasa de interés recibida por una inversión que consiste en pagos e ingresos que ocurren a intervalos regulares.

La función TIR usa el orden de los valores dentro de la matriz para interpretar el orden de los pagos y los recibos. Asegúrese de escribir los valores del pago y del recibo en la secuencia correcta. El flujo de efectivo para cada período no tiene que ser fijo, como lo es para una anualidad.

La TIR se calcula por iteración. Comenzando con el valor de la conjetura, la TIR recorre el cálculo hasta que el resultado es preciso con una precisión del 0,00001 por ciento. Si la TIR no puede encontrar un resultado después de 20 intentos, se produce un error.

Ejemplo

Nota

Los ejemplos siguientes muestran el uso de esta función en un módulo de Visual Basic para Aplicaciones (VBA). Para obtener más información sobre cómo trabajar con VBA, seleccione referencia para desarrolladores en la lista desplegable situada junto a búsqueda y escriba uno o varios términos en el cuadro de búsqueda.

En este ejemplo, la función TIR devuelve la tasa interna de retorno para una serie de 5 flujos de efectivo contenidos en la matriz Values(). El primer elemento de la matriz es un flujo de efectivo negativo que representa los costos de inicio de la empresa. Los 4 flujos de efectivo restantes representan flujos de efectivo positivos para los siguientes 4 años. Guess es la tasa interna de retorno estimada.

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.