Função NPer

Retorna um Double (tipo de dados Duplo: um tipo de dados básico que contém números de ponto flutuante de dupla precisão. É armazenado como um número de 64 bits e seu intervalo de valores vai de aproximadamente -1,797E308 a -4,940E-324 (negativo), de 4,94E-324 a 1,797E308 (positivo) e 0.) especificando o número de períodos para uma anuidade com base em pagamentos fixos, periódicos e em uma taxa de juros fixa.

Sintaxe

NPer(taxa, pgto, vp [, vf ] [, tipo ] )

A sintaxe da função NPer tem os seguintes argumentos (argumento: um valor que fornece informações a uma ação, um evento, um método, uma função ou um procedimento.):

Argumento Descrição
taxa Obrigatório. Double especificando a taxa de juros por período. Por exemplo, se você obter um empréstimo para compra de um carro a uma taxa anual (APR) de 10% e fizer pagamentos mensais, a taxa por período será 0,1/12 ou 0.0083.
pgto Obrigatório. Double especificando o pagamento a ser realizado em cada período. Os pagamentos geralmente contêm um principal e juros que não se alteram enquanto durar a anuidade.
vp Obrigatório. Double especificando o valor presente, ou valor atual, de uma série de pagamentos ou recebimentos futuros. Por exemplo, quando você obtém um empréstimo para comprar um carro, a quantia do empréstimo é o valor presente para o credor, ao qual você fará os pagamentos mensais do carro.
vf Opcional. Variant (tipo de dados Variant: o tipo de dados padrão para variáveis que não têm caracteres de declaração de tipo quando uma instrução Deftype não está sendo usada. Um Variant pode armazenar dados numéricos, cadeias de caracteres, data/hora, valores Nulo ou dados Vazio.) especificando o valor futuro ou o balanço de caixa que você deseja ter após o pagamento final. Por exemplo, o valor futuro de um empréstimo é US$ 0, pois este é o valor após o pagamento final. Contudo, se você quiser economizar US$ 50.000 em 18 anos para a educação de seu filho, então US$ 50.000 é o valor futuro. Se esse argumento for omitido, o valor pressuposto será 0.
tipo Opcional. Variant especificando quando os pagamentos vencem. Use 0 se os pagamentos vencerem no final do período de pagamento ou 1 se os pagamentos vencerem no início do período. Se o argumento for omitido, o valor pressuposto será 0.

Comentários

Uma anuidade é uma série de pagamentos de caixa fixos por um período de tempo. Uma anuidade pode ser um empréstimo (como um financiamento para compra da casa) ou um investimento (como um plano de poupança mensal).

Para todos os argumentos (argumento: um valor que fornece informações a uma ação, um evento, um método, uma função ou um procedimento.), o valor pago (como depósitos em poupanças) é representado por números negativos; o valor recebido (como apurações de dividendos) é representado por números positivos.

Exemplo

 Observação   Os exemplos a seguir demonstram o uso dessa função em um módulo do Visual Basic for Applications (VBA). Para obter mais informações sobre como trabalhar com VBA, selecione Referência sobre o Desenvolvedor na lista suspensa ao lado de Pesquisa e digite um ou mais termos na caixa de pesquisa.

Este exemplo usa a função NPer para retornar o número de períodos durante os quais os pagamentos devem ser feitos para pagar o empréstimo cujo valor está contido em PVal. Também foram fornecidos a taxa de juros do período (APR / 12), o pagamento (Payment), o valor futuro do empréstimo (FVal) e um número que indica se o pagamento vence no início ou final do período de pagamento (PayType).

Dim FVal, PVal, APR, Payment, PayType, TotPmts

' When payments are made.
Const ENDPERIOD = 0, BEGINPERIOD = 1

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.
Payment = InputBox("How much do you " & _
          "want to pay each month?")
PayType = MsgBox("Do you make payments " & _
          "at the end of month?", vbYesNo)

If PayType = vbNo Then 
    PayType = BEGINPERIOD 
    Else PayType = ENDPERIOD
End If

TotPmts = NPer(APR / 12, -Payment, PVal, FVal, PayType)

If Int(TotPmts) <> TotPmts Then 
    TotPmts = Int(TotPmts) + 1
End If

MsgBox "It will take you " & TotPmts & _
" months to pay off your loan."

      
 
 
Aplica-se a:
Access 2007