Excel Macro está gravando como texto

[AlexAltheman]

Olá, alguém por favor pode me ajudar.

 

Fiz a planilha anexo com um formulário que ao clicar em qualquer lugar da planilha se abre para preenchimento. Há 2 programações - a "lscadastrar" e a "lspreenccher"

 

Ao clicar no botão gravar a macro salva os dados do formulário na planilha porém todos em formatação de texto. Eu gostaria de salvar esses dados em formatação de moeda e %.  Gostaria também que ao clicar em alguma linha já preenchida os dados fossem copiados para o formulário de forma que eu conseguisse executar os cálculos sem problema.

 

Já tentei realizar uma formatação manual colocando o R$ e % nos números ao salvar porém, quando eu clico em uma linha preenchida e ativa a função "lspreencher" ele retorna com os caracteres e não consigo realizar cálculos.

 

Por favor preciso de ajuda.

ezyzip.zip

[Midori]

@AlexAltheman Para salvar como valor use a propriedade Value do TextBox, p.ex,

 

.Cells(lLinha, 10).Value = frmCliente.txtdolar.Value
.Cells(lLinha, 11).Value = frmCliente.txteuro.Value
.Cells(lLinha, 12).Value = frmCliente.txtcusto.Value
...

 

Sobre copiar os dados para o formulário, a Sub lsPreencher faz isso no DoubleClick.

[AlexAltheman]

@Midori Muito obrigado pela ajuda mas infelizmente não deu certo.

 

No ex. que você mencionou acima a macro cadastrar até envia para planilha como valores mas eu gostaria que:

 

.Cells(lLinha, 10).Value = frmCliente.txtdolar.Value - ( nesse caso queria que o simbolo de $ aparecesse na planilha)

.Cells(lLinha, 11).Value = frmCliente.txteuro.Value - ( nesse caso queria que o simbolo de $ aparecesse na planilha)

.Cells(lLinha, 13).Value = frmCliente.txtgm - (Nesse caso é um numero em porcentagem e ao gravar gostaria de ter o % na planilha)

 

Pode me ajudar?

[Midori]

@AlexAltheman Agora é só deixar as células da tabela com essas formatações. Antes não era possível porque o formulário escrevia no formato texto, mas agora no numérico você pode aplicar.

[AlexAltheman]

@Midori Muito obrigado..

 

Deu td certo..