Função PV [VBA]
Devolve o Valor Presente de um investimento resultante de uma série de pagamentos regulares.
Pmt( Rate as Double, NPer as Double, Pmt as Double, [FV as Variant], [Due as Variant] )
Double
taxa é a taxa de juro por período.
NPer é o número total de períodos, durante o qual a anuidade é paga.
Pgto é o pagamento regular efetuado em cada período.
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 ExamplePV
' Calcular o valor atual de uma anuidade que paga 1000,00€ por mês durante 6 anos.
' Os juros são 10% ao ano, e cada pagamento é feito no fim do mês.
Dim pv1 As Double
pv1 = PV( 0.1/12, 72, -1000 )
print pv1 ' pv1 é calculado para ser 53978,6654781073.
End Sub