Notifications
Clear all

UserForm

6 Posts
4 Usuários
0 Reactions
1,716 Visualizações
 Zeuh
(@zeuh)
Posts: 0
New Member
Topic starter
 

Boa tarde Galera,

preciso de uma ajuda.

tenho uma planilha de registro, onde é realizado os registros usando formulario UserForm.
os valores dos textbox é inserido numa determinada aba (plan1) e em outra aba (plan2) é usado para realizar a soma dos valores de plan1.

porem, quando é lançado numeros inteiros na plan1, usando formulario userform, a soma no plan2 é considerado, mas se for lançado numeros decimais, esse numero decimal nao é considerado na soma em plan2.

exemplo:
em plan 1, em uma coluna D lanço: 35 - 34 - 15
em plan 2 faço somatorio desta coluna D : 35 + 34 + 15 = 84, correto

se usar numero decimal, o mesmo nao incluir na soma:
usando exemplo acima, se incluir na coluna D um valor de 3,5 :
em plan 1, em uma coluna D lanço: 35 - 34 - 15 - 3,5
em plan 2 faço somatorio desta coluna D : 35 + 34 + 15 + 3,5 = 84, incorreto, onde deveria ser 87,5.

para resolver o problema, preciso ir na celula onde esta o numero decimal e fazer f2 + enter

nao sei se fui claro...

desde já agradeço.

 
Postado : 24/02/2017 11:25 am
(@hronconi)
Posts: 314
Reputable Member
 

Favor anexar a planilha em modo compactado

 
Postado : 24/02/2017 11:32 am
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

Zeuh,

Boa Tarde!

Para atender a sua demanda é necessário uma série de informações. Desse modo, anexe seu arquivo aqui mesmo no fórum para que possamos ajudar.

 
Postado : 24/02/2017 11:32 am
 Zeuh
(@zeuh)
Posts: 0
New Member
Topic starter
 

SEGUE PLANILHA,

para abrir o formulario, clicar em " registro de controle de carga"...

obrigado...

 
Postado : 24/02/2017 11:52 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Por Default TextBox's "passam" seus valores como texto, o excel ao receber esses valores tenta "decodificar" os valores recebidos do VBA, porem nem sempre e possivel.
Então valores numéricos/data/horas precisam de um "empurrão" para essa decodificação, temos então as funções de conversão de dados; tipo Val / Cdbl / cDec / cDate etc..
Ao salvar os valores numéricos, principalmente os que tem decimal utilize cdbl ou cdec
Exemplo: - Cells(linhavazia, 9).Value = CDbl(Me.TXT_AÇO.Value)

 
Postado : 24/02/2017 1:29 pm
 Zeuh
(@zeuh)
Posts: 0
New Member
Topic starter
 

valeu Reinaldo,

funcionou perfeitamente......

vou dar continuidade na planilha.....

obrigado pela força...

 
Postado : 25/02/2017 8:44 am