PPago (función)

Devuelve un Doble que especifica el pago principal para un período determinado de una anualidad en función de pagos periódicos fijos y una tasa de interés fija.

Sintaxis

PPmt(tasa, período,nper,pv [, fv ] [, tipo ] )

La sintaxis de la función PAGOPRmt consta de los siguientes argumentos:

Argumento	Descripción
tasa	Obligatorio. Double especificando el tipo de interés por período. Por ejemplo, si obtiene un préstamo para automóvil a una tasa de porcentaje anual (APR) del 10 por ciento y realiza pagos mensuales, la tasa por período es 0.1/12 o 0.0083.
por	Obligatorio. Entero que especifica el período de pago en el intervalo de 1 a nper.
nper	Obligatorio. Entero que especifica el número total de períodos de pago en la anualidad. Por ejemplo, si realiza pagos mensuales de un préstamo de automóvil de cuatro años, su préstamo tiene un total de 4 * 12 (o 48) períodos de pago.
PV	Obligatorio. Doble especificación del valor presente, o el valor hoy, de una serie de pagos o recibos futuros. Por ejemplo, cuando pide dinero prestado para comprar un automóvil, el monto del préstamo es el valor presente para el prestamista de los pagos mensuales del automóvil que realizará.
fv	Opcional. Variante que especifica el valor futuro o el saldo de efectivo que deseas después de haber realizado el pago final. Por ejemplo, el valor futuro de un préstamo es 0 $ porque ese es su valor después del pago final. Sin embargo, si desea ahorrar $ 50,000 durante 18 años para la educación de su hijo, entonces $ 50,000 es el valor futuro. Si se omite, se asume 0.
tipo	Opcional. Variante que especifica cuándo vencen los pagos. Use 0 si los pagos vencen al final del período de pago o use 1 si los pagos vencen al principio del período. Si se omite, se asume 0.

Observaciones

Una anualidad es una serie de pagos fijos en efectivo realizados durante un período de tiempo. Una anualidad puede ser un préstamo (como una hipoteca de vivienda) o una inversión (como un plan de ahorro mensual).

Los argumentos tasa y nper deben calcularse utilizando períodos de pago expresados en las mismas unidades. Por ejemplo, si la tasa se calcula usando meses, nper también debe calcularse usando meses.

Para todos los argumentos, el efectivo pagado (como depósitos a ahorros) está representado por números negativos; El efectivo recibido (como cheques de dividendos) está representado por números positivos.

Ejemplo de consulta

Expresión	Resultados
SELECT FinancialSample.*, PPMT([AnnualRate]/12,10,[TermInYears]*12,-[LoanAmount],0,0) AS INTPaid FROM FinancialSample;	Devuelve todos los campos de la tabla "FinancialSample", calcula el importe de capital pagado en el "por"(10 en este ejemplo) de "LoanAmount" en función de "AnnualRate" y "TermInYears" y muestra los resultados en la columna INTPaid.

Ejemplo VBA:

En este ejemplo se usa la función PPmt para calcular qué cantidad de un pago de un período específico es principal cuando todos los pagos son de igual valor. Se indica la tasa de interés porcentual por período (APR / 12), el período de pago para el que se desea la parte principal (Period), el número total de pagos (TotPmts), el valor presente o el principal del préstamo (PVal), el valor futuro del préstamo (FVal) y un número que indica si el pago vence al principio o al final del período de pago (PayType).

Dim NL, TB, Fmt, FVal, PVal, APR, TotPmts, PayType, Payment, Msg, MakeChart, Period, P, I
Const ENDPERIOD = 0, BEGINPERIOD = 1    ' When payments are made.
NL = Chr(13) & Chr(10)    ' Define newline.
TB = Chr(9)    ' Define tab.
Fmt = "###,###,##0.00"    ' Define money format.
FVal = 0    ' Usually 0 for a loan.
PVal = InputBox("How much do you want to borrow?")
APR = InputBox("What is the annual percentage rate of your loan?")
If APR > 1 Then APR = APR / 100    ' Ensure proper form.
TotPmts = InputBox("How many monthly payments do you have to make?")
PayType = MsgBox("Do you make payments at the end of month?", vbYesNo)
If PayType = vbNo Then PayType = BEGINPERIOD Else PayType = ENDPERIOD
Payment = Abs(-Pmt(APR / 12, TotPmts, PVal, FVal, PayType))
Msg = "Your monthly payment is " & Format(Payment, Fmt) & ". "
Msg = Msg & "Would you like a breakdown of your principal and "
Msg = Msg & "interest per period?"
MakeChart = MsgBox(Msg, vbYesNo)    ' See if chart is desired.
If MakeChart <> vbNo Then
    If TotPmts > 12 Then MsgBox "Only first year will be shown."
    Msg = "Month  Payment  Principal  Interest" & NL
    For Period = 1 To TotPmts
        If Period > 12 Then Exit For    ' Show only first 12.
        P = PPmt(APR / 12, Period, TotPmts, -PVal, FVal, PayType)
        P = (Int((P + .005) * 100) / 100)    ' Round principal.
        I = Payment - P
        I = (Int((I + .005) * 100) / 100)    ' Round interest.
        Msg = Msg & Period & TB & Format(Payment, Fmt)
        Msg = Msg & TB & Format(P, Fmt) & TB & Format(I, Fmt) & NL
    Next Period
    MsgBox Msg    ' Display amortization table.
End If