Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Label=Textbox + Tex...
 
Notifications
Clear all

Label=Textbox + Textbox

 
2024 - VBA & Macros
4 Posts
2 Usuários
0 Reactions
890 Visualizações
RSS
 kurkas
(@kurkas)
Posts: 85
Estimable Member
Topic starter
 

Olá,

Bem sei que houve um tópico recente e muito parecido, mas preciso saber como faço para o código a seguir fazer aparecer de imediato o resultado, sem ter que clicar.

Private Sub Label172_click()
Label172.Caption = CDbl(TextBox3.Value) + CDbl(TextBox10.Value)
End Sub

Quero que o valor do resultado apareça quando envio os dados de TextBox3 e TextBo10 para a planilha.
Obrigado

 
Postado : 22/01/2014 1:57 pm
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde kurkas,

adicione isso no lugar desse código:

Private Sub TextBox10_Change()
Label172.Caption = CDbl(TextBox3.Value) + CDbl(TextBox10.Value)
End Sub
Private Sub TextBox3_Change()
Label172.Caption = CDbl(TextBox3.Value) + CDbl(TextBox10.Value)
End Sub

Qualquer coisa da o grito.
Abraço

 
Postado : 22/01/2014 2:28 pm
 kurkas
(@kurkas)
Posts: 85
Estimable Member
Topic starter
 

Resolvi!
Obrigado

 
Postado : 23/01/2014 1:30 pm
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Caso seja necessário reabrir o tópico, o autor poderá enviar uma MP para um dos moderadores solicitando o desbloqueio.

 
Postado : 23/01/2014 4:01 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico