Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Como fazer o "...
 
Notifications
Clear all

Como fazer o "zero" aparecer no final de valores c/ vírgula?

 
2024 - VBA & Macros
Post Recente por wolneypk 12 anos atrás
5 Posts
3 Usuários
0 Reactions
999 Visualizações
RSS
wolneypk
 wolneypk
(@wolneypk)
Posts: 188
Estimable Member
Topic starter
 

Amigos, tenho uma variável que faz alguns cálculos e me retorna valores "quebrados" em uma txtbox (exemplo: 1,23 - 3,56 - 67,12...)
Só que têm um pórém: quando o último numero a ser retornado é um zero, ele não mostra o zero! O resultado fica tipo 1,2 ou 43,1
Preciso que os valores fiquem certinhos com o zero no final (quando existir, é claro)

Não sei se isso influencia, mais estou utilizando a função Round para arredondar os valores, pois no geral os resultados tem 4 ou 5 numeros depois da vírgula (13,6895)

Vejam um exemplo do código que estou utilizando:

tab = Round(tab2 * (Application.WorksheetFunction.VLookup((procv_porcent_venda), Plan4.Range("V2:Z6"), 2, 0)), 2)

Será que os amigos podem me ajudar?
Ahhh, só lembrando que isso tudo qeu estou fazendo é em Vba :)

"O impossível, é só uma questão de tempo"

 
Postado : 16/04/2013 8:21 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Leia:
http://msdn.microsoft.com/en-us/library ... =office.10).aspx

Att

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

 
Postado : 16/04/2013 9:28 am
 vitor
(@vitor)
Posts: 57
Trusted Member
 

se for como imagino dá uma olhada na máscara da célula (se o cálculo tiver sendo feito em uma célula e a textbox pega o valor da célula).
posta o arquivo ?

"Nisto se manifestou o amor de Deus em nós: em haver Deus enviado o seu Filho unigênito ao mundo, para vivermos por meio dEle" 1 Jo 4-9

 
Postado : 16/04/2013 9:46 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Na parte da rotina que postou não mostra em que momento envia o valor para o Textbox, apos ser carregado no textbox é necessário formatar ou depedendo converter para valor numerico, ente uma das opções abaixo :

textbox1.text=format(textbox1.text,"0.00%") 'formata o valor para percentual

textbox1.text=format(textbox1.text,"$#,##0.00") 'formata o valor para moeda R$

Eles devem ser utilizados nos eventos EXit ou Change do textbox, logicamente depedendo de como está carregando os mesmos.

Faça os testes e qq duvida retorne.

[]s

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

 
Postado : 16/04/2013 10:47 am
wolneypk
 wolneypk
(@wolneypk)
Posts: 188
Estimable Member
Topic starter
 

Perfeito Mauro!
Simples e objetivo!

Tenho reparado que muitas coisas são bem parecidas na sua parte de contrução de estrutura de fórmulas entre Excel e Vba.
A ajuda dos amigos tem sido fundamental para chegar ao resultado final!

Forte abraço e mais uma vez, muito obrigado á todos!

"O impossível, é só uma questão de tempo"

 
Postado : 17/04/2013 11:51 am
Forum Jump:
  Tópico Anterior
Próximo Tópico