Função Rate

Aplica-se a
Access para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Retorna um Double especificando a taxa de juros por período de uma anuidade.

Sintaxe

Rate(nper, pmt,pv [, fv ] [, type ] [, guess ] )

A sintaxe da função Taxa tem estes argumentos:

Argumento Descrição
nper Obrigatório. Duplicação da especificação do número total de períodos de pagamento na anuidade. Por exemplo, se você fizer pagamentos mensais de um empréstimo de carro de quatro anos, seu empréstimo terá um total de 4 * 12 (ou 48) períodos de pagamento.
Mensagem de email Obrigatório. Duplo especificando o pagamento a ser feito a cada período. Pagamentos geralmente contêm principal e juros que não mudam ao longo da vida da anuidade.
pv Obrigatório. Duplicar a especificação do valor presente, ou o valor atual, de uma série de pagamentos ou recebimentos futuros. Por exemplo, quando você pede dinheiro emprestado para comprar um carro, o valor do empréstimo é o valor presente para o credor dos pagamentos mensais do carro que você fará.
vf Opcional. Variante que especifica o valor futuro ou o saldo de caixa desejado depois de fazer o pagamento final. Por exemplo, o valor futuro de um empréstimo é US$ 0, pois esse é o seu valor após o pagamento final. No entanto, se você quiser economizar $ 50,000 em 18 anos para a educação de seu filho, $ 50,000 é o valor futuro. Se omitido, 0 será assumido.
tipo Opcional. Variante que especifica um número que indica o vencimento dos pagamentos. Use 0 se os pagamentos vencerem no final do período de pagamento ou use 1 se os pagamentos vencerem no início do período. Se omitido, 0 será assumido.
acho que Opcional. A variante que especifica o valor que você estima será retornada por Taxa. Se omitido, a estimativa é 0,1 (10%).

Comentários

Uma anuidade é uma série de pagamentos fixos em dinheiro feitos durante um período de tempo. Uma anuidade pode ser um empréstimo (como uma hipoteca residencial) ou um investimento (como um plano de poupança mensal).

Para todos os argumentos, o dinheiro pago (como depósitos na poupança) é representado por números negativos; O dinheiro recebido (como cheques de dividendos) é representado por números positivos.

A taxa é calculada por iteração. Começando com o valor da estimativa, Rate percorre o cálculo até que o resultado seja preciso dentro de 0,00001 por cento. Se Rate não conseguir encontrar um resultado após 20 tentativas, ele falhará. Se sua estimativa for 10% e a taxa falhar, tente um valor diferente para a estimativa.

Exemplo de consulta

Expressão. Resultados
SELECT FinancialSample.*, (Rate([TermInYears]*12,-[MonthlyRePayment],[LoanAmount],0,0,0.1)*12) AS InterestRate FROM FinancialSample; Retorna todos os campos da tabela "FinancialSample" e a "Taxa" anual de juros com base em "TermInYears", "MonthlyRePayment" e "LoanAmount" e exibe os resultados na coluna InterestRate.

Exemplo de VBA

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 o VBA, selecione Referência do desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.

Este exemplo usa a função Rate para calcular a taxa de juros de um empréstimo dado o número total de pagamentos (), o valor do pagamento do empréstimo (TotPmtsPayment), o valor presente ou principal do empréstimo (PVal), o valor futuro do empréstimo (FVal), um número que indica se o pagamento é devido no início ou no final do período de pagamento (),PayType e uma aproximação da taxa de juros esperada (Guess).

Dim Fmt, FVal, Guess, PVal
Dim Payment, TotPmts, PayType, APR
' When payments are made.
Const ENDPERIOD = 0, BEGINPERIOD = 1    
Fmt = "##0.00"    ' Define percentage format.
FVal = 0    ' Usually 0 for a loan.
Guess = .1    ' Guess of 10 percent.
PVal = InputBox("How much did you borrow?")
Payment = InputBox("What's your monthly payment?")
TotPmts = InputBox("How many monthly payments do " & _
          "you have to make?")
PayType = MsgBox("Do you make payments at the end " & _
          "of the month?", vbYesNo)
If PayType = vbNo Then 
    PayType = BEGINPERIOD 
    Else PayType = ENDPERIOD
End If
APR = (Rate(TotPmts, -Payment, PVal, _
      FVal, PayType, Guess) * 12) * 100
MsgBox "Your interest rate is " & _
    Format(CInt(APR), Fmt) & " percent."