¿Cómo usar la función PPmt en VBA?

La función `PPmt` en VBA se utiliza para calcular el pago principal de un préstamo o anualidad para un período específico dado un interés constante y pagos periódicos constantes. La función `PPmt` es parte del objeto `WorksheetFunction`, lo que significa que puedes acceder a ella de la misma manera que a cualquier otra función de hoja de cálculo de Excel, pero desde VBA.

Aquí tienes la sintaxis básica de la función `PPmt`:

PPmt(rate, per, nper, pv, [fv], [type])

Donde:

  • `rate`: es la tasa de interés por periodo.
  • `per`: es el periodo para el cual quieres calcular el pago principal y debe estar en el rango de 1 a `nper`.
  • `nper`: es el número total de periodos de pago en la anualidad.
  • `pv`: es el valor presente o el total principal de la serie de pagos futuros.
  • `[fv]`: (opcional) es el valor futuro o el saldo en efectivo que se quiere tener después del último pago. Si se omite, se asume que es 0.
  • `[type]`: (opcional) es el número 0 (cero) o 1 e indica cuándo vencen los pagos. Si se omite, se asume que es 0. Use 0 si los pagos vencen al final del periodo y 1 si vencen al principio.

A continuación, te muestro un ejemplo de cómo usar la función `PPmt` en VBA para calcular el pago principal de un préstamo:

Sub CalcularPagoPrincipal()
    Dim dblTasaInteres As Double
    Dim intPeriodo As Integer
    Dim intTotalPeriodos As Integer
    Dim dblValorPresente As Double
    Dim dblPagoPrincipal As Double

    ' Ingresar los valores para el préstamo
    dblTasaInteres = 0.05 / 12 ' Tasa de interés del 5% anual convertida a mensual
    intPeriodo = 1 ' Primer pago
    intTotalPeriodos = 60 ' Préstamo a 5 años
    dblValorPresente = -100000 ' Valor del préstamo
    
    ' Calcular el pago principal del primer periodo
    dblPagoPrincipal = Application.WorksheetFunction.PPmt(dblTasaInteres, intPeriodo, intTotalPeriodos, dblValorPresente)
    
    ' Mostrar el resultado
    MsgBox "El pago principal para el primer periodo es: " & dblPagoPrincipal
End Sub

En este ejemplo, el procedimiento `CalcularPagoPrincipal` calcula el pago principal para el primer periodo de un préstamo de 100,000 unidades monetarias con una tasa de interés del 5% al año (que se convierte a mensual dividiendo entre 12) y un término de 5 años (60 pagos mensuales).

Recuerda que `dblValorPresente` es un número negativo porque representa una salida de fondos (es decir, el préstamo que tomas). La `PPmt` devuelve un valor negativo porque es un pago, pero lo mostramos como un número positivo en el mensaje con la función `MsgBox`.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Excel cursos

Access

cursos de Access

Power BI

cursos power BI

Ayúdanos a hacer crecer el proyecto

Deja un comentario