Função PPmt [VBA]

Retorna para um determinado período o pagamento sobre o principal para um investimento com base em pagamentos constantes e periódicos, e uma taxa de juros constante.

Esta função é ativada com a instrução Option VBASupport 1 colocada antes do código executável num módulo.

Pmt( Rate as Double, Per as Double, NPer as Double, PV as Double, [FV as Variant], [Due as Variant] )

Double

Taxa é a taxa de juros periódica.

Per é o número de períodos para a qual se deseja calcular o pagamento principal (deve ser um inteiro entre 1 e Nper).

NPer é o número total de períodos, durante o qual a anuidade é paga.

VP (opcional) é o valor presente de um investimento.

VF (opcional) é o valor futuro do empréstimo ou investimento.

Tipo (opcional) define se o pagamento é devido no início ou no fim do período.

0 - o pagamento é devido no fim do período;

1 - o pagamento é devido no início do período.

REM ***** BASIC *****
Option VBASupport 1
Sub ExamplePPmt
' Calcula os pagamentos do principal durante os meses 4 e 5, para um empréstimo que deverá ser pago por inteiro
' ao longo de 6 anos. Juros são 10% ao ano e pagamentos são feitos no fim do mês.
Dim ppMth4 As Double
Dim ppMth5 As Double
'Pagamento principal durante o mês 4:
ppMth4 = PPmt( 0.1/12, 4, 72, 100000 )
print ppMth4 ' ppMth4 é calculado para ser -1044,94463903636
'Pagamento principal durante o mês 5:
ppMth5 = PPmt( 0.1/12, 5, 72, 100000 )
print ppMth5' ppMth5 é calculado para ser -1053,65251102833
End Sub