Textbox e nós vamos fazer uma macro em separado sub eu vou chamar esta macro de somar abre e fecha parênteses e pressiona enter próximo passo é colocar um sistema.
De tratamento de erro on error go to erro caso tudo ocorreu bem Exit sub Caso contrário vai para erro dois pontos e exibe uma msg Box abre aspas duplas erro.
Ponto de exclamação e fecha as aspas duplas vírgula VB crítical vírgula abre aspas duplas título da mensagem somar e fecha as aspas duplas por enquanto deixem desativado o sistema de.
Tratamento de erro próximo passo é definir as variáveis da nossa macro din v1 as Double do tipo número vírgula V2 as Double vírgula V3 também as Double No meu caso eu tenho três text box então eu.
Defini três variáveis próximo passo é capturar as informações para as variáveis não é no entanto tem um detalhe variável do tipo Double vai aceitar somente números Então.
Antes de capturar a informação da text box eu preciso verificar se na textbox tem um número válido então if is numeric para verificar se é número abre e fecha parênteses e dentro dos.
Parênteses vai o name da textbox no meu caso primeira textbox é a textbox 1 pon value fora dos parênteses igual a true then.
Else e if Se entrou na primeira parte do signica que eu tenho um número válido na text box neste caso a variável v1 vai ser igual a minha.
Textbox pon no entanto se entrar no a variável v1 vai ser iG formação mas no meu caso eu quero somar mais a textbox.
2 e a textbox 3 e colocar o resultado na textbox 4 de volta no código então para capturar a segunda informação eu vou reaproveitar este if copia e cola Deixa eu subir um pouco.
Veja Também:
- Planilha de Gestão de Garantias do Cliente em Excel 6.0
- Curva ABC no Excel
- Gerar Cartas e Certificados planilha cadastro de Membros
Para facilitar a
Visualização e agora vai ser a textbox 2 variável V2 textbox 2 variável.V2 para a terceira text box mesmo esquema preciso verificar se tem um número válido textbox 3 variável V3 textbox.
3 variável V3 capturei as informações Agora eu preciso somar os valores e colocar o resultado na textbox 4 então textbox.
4 P value igual a VBA P Format porque eu já quero definir o formato de exibição do número abre e fecha parênteses e dentro dos parênteses variável v1 mais variável V2 mais.
Variável V3 vírgula e abre e fecha aspas duplas e dentro das aspas duplas o formato de exibi meu caso eu quero exibir no.
Formato Moa feito a macro galera próximo passo é acionar a macro nas text box podem copiar o nome da macro e no evento Change da minha textbox.
1oc de código e precisamos acionar a macro também nas demais textbox no meu caso evento Change da text box 2 deixa eu dar uma ajustada textbox.
2 textbox 3 também no evento Change beleza acionamos a macro para somar salva as alterações e vamos testar então mesmo que alguma tex box.
Esteja vazia precisa fazer a soma show de bola pessoal conforme eu vou colocando informações nas text box vai fazendo a soma mesmo que a text bo esteja vazia.
Postar um comentário