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.

Sintaxis básica

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

• 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.

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

Access

Power BI

Ayúdanos a hacer crecer el proyecto