Boa tarde, carlam.
1) a variável taxa não está vindo com 4 casas decimais
Tenta assim :
ActiveCell.Offset(0, 2) = CDbl(taxa)
3) Gostaria de inserir algum comando que caso o usuário clique em "Cancelar" da caixa de inputbox não dê erro de depuração, e apenas encerrasse a inputbox nesta situação.
Para cada Inputbox teste assim:
If data = Falso Then Exit Sub
Duvida, por que você não monta um UserForm com todos esses campos, ficaria mais as simples.
Se a resposta foi útil! Clique na mãozinha ao lado do botão Citar.
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. 
Postado : 12/02/2016 3:06 pm