Notifications
Clear all

não arredondar numeros após a vírgula

4 Posts
2 Usuários
0 Reactions
1,046 Visualizações
(@leandrokbk)
Posts: 2
New Member
Topic starter
 

Boa tarde,
Sou novo no VBA e estou tentando carregar um listbox com dados de uma variável tipo double.

lstLista.List(lstLista.ListCount - 1, 1) = var1

ele adiciona o valor, porém aparece por exemplo 0,4955 e eu precisava deixar com apenas 3 números após a vírgula (0,495).
Já tentei o format (var1,"0.000"), mas ele arredonda o valor para 0,496.

desde já agradeço a atenção

 
Postado : 28/09/2017 11:50 am
gfranco
(@wzxnet7)
Posts: 653
Honorable Member
 

Boa tarde.
Veja se o anexo te ajuda...

Resposta útil? Clique na mãozinha ao lado do botão Citar.

 
Postado : 28/09/2017 1:32 pm
gfranco
(@wzxnet7)
Posts: 653
Honorable Member
 

Nota:
se precisar fazer conta com os resultados, vai precisar converter com um cdbl depois de capturar o número de caracteres desejado da string.

Resposta útil? Clique na mãozinha ao lado do botão Citar.

 
Postado : 28/09/2017 3:17 pm
(@leandrokbk)
Posts: 2
New Member
Topic starter
 

Boa tarde.
Veja se o anexo te ajuda...

Muito obrigado pela ajuda, funcionou certinho

 
Postado : 29/09/2017 5:09 am