Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Ajuda com arredondamento
-
- Consultor
- Mensagens: 285
- Registrado em: Qua Dez 09, 2015 5:54 pm
Ajuda com arredondamento
boa noite forum.
tenho uma textbox que coloco um valor e depois queira que ele somasse 23%,
tentei fazer assim:
"Textbox1*0.23+textbox1", mas ele da um numero com varias casas decimais, mas eu queia que ele ao gravar o numero desse o numero com duas casas decimais , mas arredondado
ex:
125.25*0.23=28.8075
28.8075+125.25=154.0575
queria que o resultado ao gravar na celula ficasse 154.06.
ja tente o round, mas nao consigo, algume consegu dar uma ajuda sff.
Obrigado
tenho uma textbox que coloco um valor e depois queira que ele somasse 23%,
tentei fazer assim:
"Textbox1*0.23+textbox1", mas ele da um numero com varias casas decimais, mas eu queia que ele ao gravar o numero desse o numero com duas casas decimais , mas arredondado
ex:
125.25*0.23=28.8075
28.8075+125.25=154.0575
queria que o resultado ao gravar na celula ficasse 154.06.
ja tente o round, mas nao consigo, algume consegu dar uma ajuda sff.
Obrigado
-
- Consultor
- Mensagens: 285
- Registrado em: Qua Dez 09, 2015 5:54 pm
- Reinaldo
- Jedi
- Mensagens: 1537
- Registrado em: Sex Ago 01, 2014 4:09 pm
- Localização: Garça - SP / SCS - SP
Re: Ajuda com arredondamento
Motivo nenhum para gerar erro, salvo se textbox for/receber um texto como conteudo, ai vai gerar erro de tipos incompativeis
Multiplicar o valor de Textbox1 por 1.23 e a mesma conta que estava efetuando>"Textbox1*0.23+textbox1"
e a função VBA.Round, corresponde a função de arredondamento na planilha:
vba.round(Textbox1*0.23+textbox1)
Multiplicar o valor de Textbox1 por 1.23 e a mesma conta que estava efetuando>"Textbox1*0.23+textbox1"
e a função VBA.Round, corresponde a função de arredondamento na planilha:
vba.round(Textbox1*0.23+textbox1)
-
- Consultor
- Mensagens: 285
- Registrado em: Qua Dez 09, 2015 5:54 pm
Re: Ajuda com arredondamento
Bom dia Reinaldo.
O formulario estava a dar erro 13, mas nao sei se tinha haver directamente com o codigo.
o que reparei e ja percebi, é que ao digitar os numeros no teclado na parte numerica e coloco ponto(.) ele nao arredonda direito, mas se colocar a (,)no teclado letras,ele faz a conta direita.
Mais uma vez obrigado
O formulario estava a dar erro 13, mas nao sei se tinha haver directamente com o codigo.
o que reparei e ja percebi, é que ao digitar os numeros no teclado na parte numerica e coloco ponto(.) ele nao arredonda direito, mas se colocar a (,)no teclado letras,ele faz a conta direita.
Mais uma vez obrigado
-
- Consultor
- Mensagens: 285
- Registrado em: Qua Dez 09, 2015 5:54 pm
Re: Ajuda com arredondamento
Reinaldo,
existe alguma maneira de ao digitar na textbox o (.) ele mude para (,).
pergunto isto pq o formulario nao esta a ser so utilizado por mim, e como sao varias pessoas, nem todas vao estar atentas ao pormenor de colocar a virgula em vez do ponto e vai arredondar de forma errada.
e ja agora existe alguma forma de trocar a cor de uma celula mediante valor de uma combobox mas quando o codigo que esta para gravar seja este :
".Cells(linha, 2) = cmbEstado"
a ideia é se o valor da cmbestado for Finalizado ele muda a cor da celula de gravaçao para verde.
existe alguma maneira de ao digitar na textbox o (.) ele mude para (,).
pergunto isto pq o formulario nao esta a ser so utilizado por mim, e como sao varias pessoas, nem todas vao estar atentas ao pormenor de colocar a virgula em vez do ponto e vai arredondar de forma errada.
e ja agora existe alguma forma de trocar a cor de uma celula mediante valor de uma combobox mas quando o codigo que esta para gravar seja este :
".Cells(linha, 2) = cmbEstado"
a ideia é se o valor da cmbestado for Finalizado ele muda a cor da celula de gravaçao para verde.