Notifications
Clear all

Erro em multiplicação

4 Posts
3 Usuários
0 Reactions
1,331 Visualizações
(@suporte100)
Posts: 55
Trusted Member
Topic starter
 

Ola,

Estou criando um pequeno multiplicador em vba, estava tudo ok, mas quando é valor com moeda a soma da erro.
Ex. 36,9 * 3 = 110,7, mas no vba esta dando 108, porque nao esta contabilizando os centavos.

Agúem pode me ajudar nessa?

Metodo usado

Private Sub TextBox3_Change()
TextBox3 = Val(TextBox2) * Val(TextBox1)

End Sub

 
Postado : 31/01/2018 1:40 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Experimente substituir a função Val por Cdbl.
Val somente reconhece centavos após ponto, não virgula

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 31/01/2018 1:52 pm
(@suporte100)
Posts: 55
Trusted Member
Topic starter
 

Perfeito reinaldo Obrigado, e pra deixar ele como moeda? tem alguma forma?

 
Postado : 31/01/2018 1:58 pm
(@klarc28)
Posts: 971
Prominent Member
 

Suporte100, você tem 48 mensagens e agradeceu SOMENTE 2 vezes. Quando quiser agradecer, clique no joinha.

Formatar como moeda:

https://www.youtube.com/results?search_query=formatar+textbox+moeda

 
Postado : 31/01/2018 5:00 pm