JUROS COMPOSTOS
Olá pessoal!
Estou precisando de uma função que calcule juros simples e juros compostos.
Juros Simples já consegui calcular.
O problema é como calcular juros compostos...
Já tentei de tudo!
Alguém pode me ajudar.
Desde já agradeço!
Abraços a todos.
Adriano Daniel Mà ¼ller.
Estou precisando de uma função que calcule juros simples e juros compostos.
Juros Simples já consegui calcular.
O problema é como calcular juros compostos...
Já tentei de tudo!
Alguém pode me ajudar.
Desde já agradeço!
Abraços a todos.
Adriano Daniel Mà ¼ller.
veja se ajuda
http://www.vbmania.com.br/vbmforum.php?varMethod=Abrir&varID=31726&varSubPagina=1&varFiltro=filtro
se não, é so avisar.
http://www.vbmania.com.br/vbmforum.php?varMethod=Abrir&varID=31726&varSubPagina=1&varFiltro=filtro
se não, é so avisar.
CALCULO DE JUROS:
Dim CalcDias As Variant 'Declara a variável CalcDias'
Dim Total As Variant 'Declara a variável Total'
Valor = (Valor) 'Valor do documento'
Juros = (Juros) 'Taxa de Juros do documento'
CalcDias = (Vencimento) - (Data) 'Calcula a quantidade de dias'
Total = (Resultado) 'Resultado da operação'
Total = (((Valor * Juros) * (CalcDias / 30)) + Valor)
'Multiplica valor com a taxa de juros com a quantidade de dias,'
'divide por 30 e soma ao valor do documento'
Resultado = Total
ESPERO TER AJUDADO
Dim CalcDias As Variant 'Declara a variável CalcDias'
Dim Total As Variant 'Declara a variável Total'
Valor = (Valor) 'Valor do documento'
Juros = (Juros) 'Taxa de Juros do documento'
CalcDias = (Vencimento) - (Data) 'Calcula a quantidade de dias'
Total = (Resultado) 'Resultado da operação'
Total = (((Valor * Juros) * (CalcDias / 30)) + Valor)
'Multiplica valor com a taxa de juros com a quantidade de dias,'
'divide por 30 e soma ao valor do documento'
Resultado = Total
ESPERO TER AJUDADO
http://www.vbmania.com.br/vbmdetail.php?varID=1801
ja procurou pelo site?
ao ter resolvido favor fechar o tópico
ao ter resolvido favor fechar o tópico
Public Function JurosComposto(ByVal Capital as Single, ByVal Juros as Single, ByVal Tempo as Single) As Single
JurosComposto = Capital(1+Juros)^Tempo
End Function
Onde os parametros
Captal: deve ser o dinheiro aplicado
Juros: deve ser ataixa de juros mensal, ou seja 6% ao mes, deve ser passado como 0.06
Tempo: é o número de meses, por exemplo 3 meses e 12 dias, deve ser passado 3.4
JurosComposto = Capital(1+Juros)^Tempo
End Function
Onde os parametros
Captal: deve ser o dinheiro aplicado
Juros: deve ser ataixa de juros mensal, ou seja 6% ao mes, deve ser passado como 0.06
Tempo: é o número de meses, por exemplo 3 meses e 12 dias, deve ser passado 3.4
Tópico encerrado , respostas não são mais permitidas