Olá Mundo do Excel e VBA

Algoritmo de Exemplo do famoso Olá Mundo com Interface gráfica usando Visual Basic

Excel é um software proprietário da Microsoft onde permite criar planilhas de escritório profissionais e programá-las por meio da linguagem de programação Visual Basic, também de autoria da Microsoft.

No Editor do Visual Basic exiba a Caixa de Ferramentas e adicione os elementos do UserForm de nome 'UserForm' de forma que fique semelhante à imagem acima

Para edição de Macros e Desenvolvimento você pode digitar o comando Alt+F11 no sistema operacional Windows para você poder acessar a interface de desenvolvimento em Visual Basic, que faz parte de recurso do Microsoft Office. Você pode acessar o Visual Basic também clicando na Guia Desenvolvedor em seguida clicando no botão Visual Basic

O intuito deste tutorial é mostrar o funcionamento do UserForm, que é uma janela dentro do Excel que faz alguns comandos customizados que queremos, neste caso exibir uma mensagem de boas vindas à pessoa que estiver executando a planilha.

Os elementos que vamos adicionar nesta planilha são:

  1. Um UserForm
  2. Um Label com o texto: 'Digite seu nome:'
  3. Um Label para o texto de resposta do formulário
  4. Um TextBox para o usuário inserir seu nome
  5. Um Button para o usuário enviar seu nome ao formulário

formulário para o projeto

Para a completude deste tutorial temos o fundamental, que é a programação de funcionamento do formulário, quando se clicar no botão e se houver algum texto na TextBox se exibe algo parecido com a seguinte mensagem:

mensagem de boas vindas

Note que o Label da mensagem também se altera seu texto e cor de fundo como mostrado na imagem abaixo:


mensagem no formulário

O código de funcionamento do Formulário:

            
            Private Sub btn_ola_Click()
                If txt_nome.Text <> "" Then
                    MsgBox "Olá " & txt_nome.Text & ", Seja Bem vindo!", vbOKOnly, "Bem Vindo"
                    Me.lbl_saida.Caption = "Seja Bem vindo " & txt_nome.Text & "!"
                    Me.lbl_saida.BackColor = &HC0FFC0
                Else:
                    Me.lbl_saida.Caption = ""
                    Me.lbl_saida.BackColor = &H8000000F
                End If
            End Sub
        

Para a gravação de uma macro, com a guia de desenvolvedor disponível no seu Excel, faça o seguinte, clique na Guia Desenvolvedor em seguida clique no botão Gravar Marco. Adicione uma Forma de Seta para a Direita conforme na Imagem abaixo para associar a macro que exibe o formulário.

única planilha do projeto


Ao clicarmos com o botão direito da forma ou imagem podemos associar uma macro para a imagem, com a finalidade de exibir o formulário de nome 'UserForm' toda vez que clicar na forma ou pelo comando de atalho do teclado.

Digite o seguinte texto no campo Nome da Macro: ExibirFormulario sem acentuação e sem espaço entre as palavras.

Associe um atalho com as teclas 'Ctrl+Shift+F', é opcional que você deixe uma descrição sobre esta macro.

Após clicar em OK tudo que você estiver fazendo na interface gráfica do Excel começará ser gerado código sobre estas atividades. Encerre a gravação da Macro acessando a guia Desenvolvedor e em seguida Parar gravação, Edite o código gerado e deixe semelhante ao exibido abaixo:


O código para Exibir o Formulário:

            Sub ExibirFormulário()                
                ' Exibir formulário de boas vindas                
                ' Atalho do teclado: Ctrl+Shift+F
                UserForm.Show
            End Sub
        

Explicação do código

Para gerar o código acima gravamos uma macro e adicionamos um comando com a combinação das teclas de atalho: Ctrl+Shift+F para exibir o formulário com o comando e também associarmos a exibição do formulário por meio de uma forma geometrica disponível na planilha inicial, para isso o formulário deverá já ter criado com o nome de 'UserForm'.

Obrigado pela sua atenção e seja Bem Vindo! valeu e nos veremos novamente em breve.