Fazer campos do formulário calcular automaticamente no seu Visual Basic for Applications programa (VBA) pode eliminar etapas extra para o usuário. VBA pode ser usado em todas as aplicações do Microsoft Office, como o Excel. Você pode criar campos de formulário usando controles de caixa de texto em um formulário de usuário em Excel e torná-los calcular automaticamente , usando o evento "Change" para cada um dos controles. O evento "Change" será executada quando o valor nos campos são alteradas pelo usuário. Coisas que você precisa
Microsoft Office Excel
Show Mais instruções
1
Abra o Microsoft Office Excel , clique na guia "Desenvolvedor" e clique em " Visual Basic" para o lançamento do VB janela editor. Clique no menu "Inserir" e clique em " Formulário de Usuário" para inserir um novo formulário. Clique em " Caixa de Texto " na janela " Toolbox" e clique com o formulário para adicionar um novo controle de caixa de texto. Adicione mais duas caixas de texto usando a mesma técnica para criar três campos do formulário de caixa de texto .
2
botão direito do mouse na primeira caixa de texto e clique em "View Code " para abrir o editor de VB . Pressione " Ctrl" e "A" para selecionar o código padrão e pressione " Excluir". Copie e cole o seguinte código para fazer um cálculo cada vez que um novo número é digitado no primeiro campo de formulário e exibir o resultado no terceiro campo de formulário:
resultado Dim DoublePrivate Sub TextBox1_Change () Dim txtBoxTwo Como VariantMe.TextBox2.SetFocustxtBoxTwo = Me.TextBox2.Textresult = txtBoxTwo + Me.TextBox1.TextMe.TextBox3.SetFocusMe.TextBox3 = resultEnd Sub
< br >
3
Copiar e colar o seguinte código executar esse código e fazer um cálculo e exibir o resultado no terceiro campo de formulário cada vez que o segundo campo de formulário é alterado:
Private Sub TextBox2_Change () Dim txtBoxOne Como VariantMe.TextBox1.SetFocustxtBoxOne = Me.TextBox1.Textresult = txtBoxOne + Me.TextBox2.TextMe.TextBox3.SetFocusMe.TextBox3 = resultEnd
Sub
4
duplo clique em " UserForm1 " do objeto janela do Explorer e pressione " F5" para executar o programa . Introduza um número no primeiro e segundo campos do formulário para calcular e exibir o resultado no terceiro campo de formulário automaticamente.