Notifications
Clear all

Arredodamento de Valores Listview

3 Posts
2 Usuários
0 Reactions
883 Visualizações
(@rilton)
Posts: 232
Reputable Member
Topic starter
 

Bom dia,

Meu formulário vba está arredondando os valores lançados. Quando inserido um novo registro e que o mesmo possuí numero apos a vírgula (2,36) meu formulário arredonda o valor para (2). e também quando vou visualizar os dados no listview o número aparece arredondado também. Já defini todos campos com seus respectivos formatos, porém agora está aparecendo este problema. Existe algum critério para que não seja feito esse arredondamento?
Segue em anexo a planilha.

 
Postado : 05/10/2012 7:50 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Citando o help do excel

Função Val
Consulte também Exemplo Informações específicas

Retorna os números contidos em uma seqüência como um valor numérico do tipo apropriado.

Sintaxe

Val(string)

O argumento string obrigatório é qualquer expressão de seqüência válida.

Comentários

A função Val pára a leitura da seqüência no primeiro caractere que não reconhecer como parte de um número. Os símbolos e caracteres que normalmente são considerados partes de valores numéricos, como o símbolo de dólar e vírgulas, não são reconhecidos. No entanto, a função reconhece os prefixos de radicais &O (para octal) e &H (para hexadecimal). Os espaços em branco, tabulações e caracteres de alimentação de linha são retirados do argumento.

O exemplo a seguir retorna o valor 1615198:

Val(" 1615 198th Street N.E.")

No código abaixo, Val retorna o valor decimal -1 para o valor hexadecimal exibido:

Val("&HFFFF")

Observação A função Val reconhece somente o ponto (.) como um separador decimal válido. Quando separadores decimais diferentes forem usados, como em aplicativos internacionais, use CDbl para converter uma seqüência em um número.

Experimente utilizar o cdbl

 
Postado : 05/10/2012 8:59 am
(@rilton)
Posts: 232
Reputable Member
Topic starter
 

Reinaldo,

Obrigado, funcionou perfeitamente.

 
Postado : 05/10/2012 10:02 am