habilidades de Microsoft Excel são bastante reforçada através do uso de script de Visual Basic, que permite adequar as ferramentas padrão do Excel para necessidades específicas do seu projeto . Usando formulários do usuário personalizada , com controles para receber entrada do usuário, lhe dá total controle sobre dados de entrada do usuário do Excel. Ao entrar no programa a seguir irá mostrar-lhe como usar vários Visual controls.Start básico do projeto , abrindo Excel e entrar no IDE do Visual Basic ( ambiente de desenvolvimento integrado ) . Digite o IDE com alt -F11 . Coloque os controles
Na janela do IDE projetista ( View> Object) , arraste e solte os controles da caixa de ferramentas para um formulário de usuário da seguinte forma:
Coloque um controle quadro para o formulário . Na janela Propriedades, altere a legenda para " Estado Civil ". Com o controle de quadro ainda selecionado , arraste dois botões de opção dentro do controle de quadros. Arraste dois rótulos no quadro, cada um à esquerda de um botão de opção . Dê os rótulos das rubricas " casados " e " único".
Arraste uma caixa de lista por baixo do quadro e seus botões de opção. Arraste um rótulo, que deve ser automaticamente nomeado Label3 , abaixo da caixa de lista. Digite "resposta à pergunta de segurança ", por sua legenda . À direita da Label3 arrastar uma caixa de texto. Sob a caixa de texto arrastar um botão e dar-lhe a legenda " Enviar". Por fim , arraste um rótulo, que deve ser nomeado Label4 , à direita do controle de quadro . Faça sua legenda em branco.
As ações que você acabou de tomadas criou uma forma típica que coleta dados de um novo cliente em potencial. Agora você vai usar o Visual Basic para transferir os dados do cliente a partir dos controles em uma planilha do Excel.
Criando código para o formulário
duplo clique no formulário para entrar no janela de código , e selecione esses itens das duas caixas suspensas perto do topo da janela de código : formulário de usuário e Initialize. O IDE irá criar uma sub Inicializar em branco. Dentro dessa sub, digite o código , que preenche a caixa de lista quando o programa começa :
ListBox1.List = array ( "O que é que você filme favorito ? ", " Em que cidade você nasceu ? ", " O que é o som de uma mão batendo palmas ? ")
Como você fez para Inicializar sub-rotina do formulário do usuário , criar sub-rotinas em branco para os botões de opção " Clique eventos , usando caixas drop-down da janela de código. Nos eventos Click de ambos OptionButton1 e 2, digite o seguinte código: " marital. " Esse é o nome de uma função que você vai escrever agora :
Em uma seção em branco da janela de código , criar a função conjugal :
Private Sub marital () ' botão que foi selecionado Se OptionButton1.Value = True ThenLabel4.Caption = " casado " ElseLabel4.Caption = " single" End If End Sub
Transfira os dados do formulário para a planilha < br >
Criar a rotina em branco para o botão de comando de evento Click usando caixas drop-down da janela de código, e digite este em que sub-rotina :
Range (" a1" ) = Label4.CaptionRange ( "b1 ") = ListBox1.ValueRange ( " c1 ") = TextBox1.Value
Este código transfere os dados do formulário para a planilha.
Digite o último pedaço de código , uma nova sub-rotina que mostra a sua forma :
Public Sub showForm () UserForm1.Show
End Sub
Retornar para Excel (Alt- F11) e executar a macro (Developer > Macros, showForm ) . Insira os dados no formulário , pressione o seu botão , e assistir a planilha receber os valores do formulário .