VBA no Excel - Parte 1

Objetivo:

O objetivo deste tutorial ensinar a criar uma Agenda Telefnica a partir do excel e preparar voc para a criao dos prximos aplicativos, iremos aprender a utilizar o editor de Visual Basic do prprio excel.

Sendo que no desenvolvimento deste aplicativo iremos dividir em partes.

Nesta parte1 vamos conhecer as ferramentas necessrias para utilizarmos o Editor de Visual Basic do excel para criao da nossa Agenda Telefnica.

A agenda permitir que voc possa cadastrar e pesquisar nmeros telefnicos de clientes, endereo e fazer anotaes, podendo tambm ser adaptada de forma fcil as suas necessidades.

Pr-requisito:

Para voc poder acompanhar o desenvolvimento deste aplicativo e dos demais aplicativos a serem criados, ser necessrio ter conhecimento no mnimo do Curso Bsico de Excel.

Nota:

Todos os tutoriais que sero escritos por mim tem com o objetivo principal de ensinar a criar aplicativos a partir do Microsoft Excel utilizando o seu editor de Visual Basic, sero aplicativos de grande utilidade para o seu dia a dia, neste primeiro e em todos os aplicativos vamos aprender passo a passo para que voc possa compreender todo o contedo do tutorial de uma forma totalmente fcil.

Editor de Visual Basic VBA do Excel

Vamos aprender a utilizar o Editor de Visual Basic do Excel de forma direta e somente aprender os menus e comandos necessrios para o desenvolvimentos desse

aplicativo.E no momento em que desenvolvermos outros aplicativos vamos estudar outros menus e comandos necessrios para o desenvolvimento dos mesmos. Iniciaremos fazendo a seguintes perguntas:

O que um Editor de Visual Basic? Podemos dizer que um ambiente de desenvolvimento que possibilita voc trabalhar com formulrios e objetos.

Para que Utilizado? Para que possamos atravs deste formulrios e objetos criarmos cdigo de programao para facilitar a criao de solues de uma maneira mais significativa.

Iniciaremos aprendendo a abrir o ambiente de programao do excel para estudarmos os menus que utilizaremos em nosso aplicativo. Acompanhe as seguintes instrues :

Primeiramente inicie o excel; Segundo selecione o menu ferramenta, sub menu macros e em seguida Editor do Visual Basic ou simplesmente utilize as teclas de atalho (Alt + F11) , veja o procedimento partir desta segunda instruo todo descrito nas telas a baixo. Selecionando o Editor do Visual Basic atravs do menu ferramentas.

Tela:001

Veja o ambiente de desenvolvimento do editor do Visual Basic na Tela baixo.

Tela:002

Em nosso aplicativo ser necessrio aprender Quatro menus, sero eles: Menu Arquivo, Menu Exibir, Menu Inserir e Menu Executar.

Lembrando que objetivo principal aprender os menus e seus comandos que realmente utilizaremos em nosso aplicativo, vamos ver em cada um desses menus e os comandos que iremos aprender, sendo que abaixo de cada comando voc poder ver nas figuras todo o procedimento descrito de como acessar cada um.

Menu Arquivo Salvar Pasta: Como o prprio nome j diz este comando serve para salvar a pasta de trabalho e conseqentemente salvar o projeto, ento toda vez que quisermos salvar um desses itens citados anteriormente devemos utilizar este menu, como mostra a Tela 003.

Tela: 003

Menu Exibir Cdigo : Este comando ativa uma janela de cdigo do objeto mas precisamos estar com este objeto selecionado, como mostra a Tela 004 onde estamos ativando a janela de cdigo de um formulrio.

Tela: 004 (Objeto Userform1 selecionado)

Tela: 005 (Janela de Cdigo Ativada)

Objeto : Este comando utilizado para exibir o objeto novamente, como por exemplo na janela de cdigo mostrada na Tela 005, iremos exibir o objeto userform1 novamente.

Tela: 006 (Exibir objeto novamente)

Tela: 007 (Ativamos o objeto useform1 novamente)

Project Explorer : Este comando exibi uma janela onde podemos visualizar nossos projetos abertos, sendo somente uma ferramenta que ns auxilia gerenciamento dos mesmos esta localizada do lado esquerdo formulrio podendo ser inserida em qualquer lado do formulrio.

Tela: 008 (Para inserir a janela project quando ela no esta visvel)

Tela: 009 (Janela project ao lado esquerdo do formulrio)

Janela Propriedades : Lista varias propriedades dos controles permitindo que possamos alterar fonte, cor,name, altura, largura, caption tamanho entre outros, sendo que para ser ativada temos que primeiro selecionar um objeto, no caso abaixo selecionamos o objeto formulrio.

Tela: 010 (Ativando a janela propriedade da formulrio)

Tela: 011 (Ativado a janela de propriedades do formulrio)

Caixa de Ferramentas : Contem varias ferramentas que precisamos para desenvolver nossos aplicativos, portanto, iremos dar uma ateno especial vamos conhecer todas estas ferramentas necessrias para o nosso projeto.

Tela: 011 (Ativamos a caixa de ferramenta)

Tela: 012 (Utilizaremos freqentemente esta caixa)

Ponteiro: Esta ferramenta que tem aparncia de uma seta, tem como funo selecionar os objetos a serem utilizados, bem como mover os mesmos aps estarem no formulrio.

Tela: 013 (Utilizaremos freqentemente para atribuir e mover os objetos)

Label: Este objeto utilizado para escrevermos textos e esta representa por a letra A, onde o texto no pode ser alterado quando o aplicativo esta sendo executado.

Tela: 014(Este objeto pode ser chamado tambm de rotulo)

Textbox: Esta uma caixa de texto a ser utilizada para inserir textos, mas podemos inserir outros tipos de dados, como por exemplo nmeros, esta representa pelas letras ab.

Fig: 015 (Caixa de Texto colocada no formulrio)

Boto de Comando: Esta utilizado para que possamos dar cliques para executar comandos designados por ns, esta representado pelo cone parecido com um retngulo.

Tela: 016 (Boto de comando colocado no formulrio)

Menu Inserir

Userform: Este comando utilizamos para inserir formulrio em nosso projeto, a partir dele criaremos uma interface e de fcil interatividade com usurio.

Tela: 017 (Inserir Formulrio)

Tela: 018 ( A partir do formulrio criaremos a interface da nossa agenda)

Menu Executar

Executar sub/Userform: utilizado para executar o procedimento atual do aplicativo quando houver um formulrio ativo e tambm utilizado quando queremos interromper o aplicativo, quando o aplicativo estiver interrompido este mesmo executar assumi o comando de continuar.

Tela: 019 ( Executaremos o aplicativo)

Tela: 020 (Aplicativo executado, para interromper o mesmo clicamos no X no canto superior direito)

Basicamente estes so os menus e comandos que precisaremos aprender para que possamos desenvolver a nosso Agenda Telefnica.

Na prxima parte do tutorial iremos por em prtica o que aprendemos at aqui, atravs de um exemplo onde criaremos um mini aplicativo bem simples.

Concluso:

Nesta primeira parte do tutorial, mostrei a voc o Editor do Visual Basic do excel e as principais menus e controles que utilizaremos para desenvolver a agenda telefnica, tudo mostrado passo a passo com acompanhamento de telas. Bom estudo e at a prxima parte.

Editor de Visual Basic do Excel. Parte 2

Objetivo: O Objetivo deste tutorial criarmos um exemplo de aplicativo simples para praticar o que aprendemos no primeiro Tutorial, tambm vamos aprender a utilizar as propriedades de cada controle.

Pr-requisito:

Para voc poder acompanhar este tutorial e do desenvolvimento deste aplicativo e dos demais aplicativos a serem criados, ser necessrio ter conhecimento no mnimo do Curso Bsico de Excel e do Tutorial Parte1.

Nota:

Este exemplo vai possibilitar aprendemos na prtica o que estudamos na parte1 do tutorial, bem como j comearmos ter uma idia de funcionamento da nossa agenda e das funes as serem desenvolvidas.

O nosso exemplo simples de aplicativo vai nos possibilitar a escrever nosso nome um textbox e transferir para outro textbox quando clicarmos no boto de comando, o nome que daremos ao nosso exemplo ser o seguinte Exemplo prtico.

Siga as seguintes instrues:

Abra uma nova planilha do excel;

Abra o editor do visual basic (Para detalhes de como abrir o Editor do Visual Basic, Consulte a Parte1); Crie um formulrio (Para detalhes de como criar um formulrio, Consulte a Parte1); Vamos inserir no formulrio as seguintes ferramentas trs Label, duas textbox e um boto de comando, para inserir estas ferramentas clique na caixa de ferramentas, caso ela no esteja disponvel, voc dever ativar a mesma (Para detalhes de como ativar a caixa de ferramentas, consulte a Parte1). Vamos comear inserindo as trs Label no nosso formulrio, na caixa de ferramentas o ponteiro deve estar ativado, sendo assim clique sobre a label que representada pela letra A, aps de um clique sobre o formulrio, pronto voc ter inserido a primeira label, repita este mesmo procedimento para inserir as outras duas label. Este mesmo procedimento voc deve repetir para inserir os dois textbox e boto de comando,voc devera posicionar as label e os textbox e boto de comando conforme o esta mostrando a figura abaixo, para voc possionar as label basta clicar uma vez sobre ela no soltar e arrastar este mesmo procedimento serve para as demais ferramentas.

Tela: 001 (Inserindo as Label, os text Box e boto de comando)

Vamos aprender a utilizar as principais propriedades de cada controle, estas propriedades dos controles serve para alteramos o texto, cor , tamanho, fonte entre outros,iremos comear pelo formulrio mudaremos as propriedades o name do formulrio para Exemplo Prtico Altura (Heigth) = 290 e a Largura (Width)= 380 e caption tambm com o mesmo nome Exemplo Prtico.

Para a label1, mudaremos as propriedades caption de label1 para Exemplo Prtico, forecolor que onde mudamos a cor, esta ser Azul, e por ultimo a propriedade font mudaremos para Verdana com tamanho para 20, as label2 e label3 voc dever fazer o mesmo procedimento descrito acima somente alterando o tamanho da fonte para 14 e o nome para teste1 e teste2.

No texbox alteraremos somente sua propriedade name que esta com o nome de textbox1 para text_nome e a texbox2 para Text_recebenome .

O mesmo iremos fazer para o boto de comando que na sua propriedade name na qual esta com o nome de commandbutton1 iremos alterar para comando e sua cor para azul atravs da propriedade forecolor.

A seguir utilizaremos a janela de propriedades do formulrio para fazer as alteraes, (Para detalhes de como ativar a janela de propriedades do formulrio, consulte a Parte1). Siga as instrues:

Selecione o formulrio e ative a janela Propriedades . Veja na tela abaixo:

Tela: 002

A primeira propriedade que aparece o Name no qual esta escrito Userfom1 para trocarmos damos um clique sobre este nome deletamos e depois mudamos o nome para Form_ Exemplo veja o procedimento abaixo:

Tela: 003 (Clicamos onde esta escrito Userfomr1 e deletamos)

Tela: 004 (Depois escrevemos o novo nome Form_Exemplo)

Para estabelecer a altura e largura e o nome do formulrio selecionamos novamente para utilizar suas propriedades (Heigth) = 290 e a (Width)= 380 e Caption para Exemplo Prtico.Veja abaixo todo este procedimento.

Tela: 005 ( Na propriedade heigth alteramos para 290)

Tela: 006 ( Na propriedade Width alteramos para 390)

Agora iremos selecionar as propriedades da Label1 para efetuarmos as alteraes descrita em nosso exemplo. Apenas de um clique sobre a label1 para ativar as propriedades da mesma, o procedimento nas alteraes praticamente do mesmo modo em que fizemos nas propriedades do Userform1.Veja o procedimento.

Selecionaremos a label1 e mudaremos o nome para Exemplo Pratico, isso possvel atravs da sua propriedade Caption, a cor para azul atravs propriedade ForeColor e a fonte atravs da propriedade Font, para verdana e o tamanho para 20.

Tela: 007 (Selecionamos a propriedade caption e a deletamos)

Tela: 008 (Trocamos o nome para Exemplo Pratico)

Tela:009 (Selecionamos a propriedade forecolor e mudamos a cor para azul)

Tela: 010 ( Selecionamos a propriedade font e na janela fonte fazemos as alteraes)

Voc poder notar abaixo na figura 011 como aumentamos o tamanho da fonte a label ficou pequena para isso precisaremos ajusta-la, faa da seguinte maneira:

Selecionando a label aparecer um quadradinhos, neste posicione o cursor do mouse no sentido diagonal e aumente ate ficar no tamanho ideal.

Tela: 011 (Selecione a label, e atravs do quadrados arraste para ajustar)

Tela: 012 ( O ajuste deve ser o necessrio para aparecer o nome )

Agora voc deve proceder da mesma forma para alterar a label2 e label3 para seus respectivos nomes, cores e tamanhos.

Para os textbox o procedimento da mesma forma em que alteramos a propriedade da label1, trocaremos a propriedade name do textbox1 para text_nome e textbox2 para text_recebenome.

Tela: 013 (Selecionamos a propriedade name e mudamos o nome)

O mesmo voc deve fazer no textbox2 para alterar suas propriedades.

Por ultimo iremos alterar o boto de comando e sua propriedades name para comando, caption para executar e Forecolor para azul.

Tela: 014 ( Fizemos todas as alteraes descritas acima)

Seu formulrio deve ficar conforme tela abaixo:

Tela: 015 (Esta a interface do aplicativo)

Agora para executarmos nosso aplicativo utilizaremos a linha de cdigo abaixo dentro do boto de comando (Para detalhes de como ativar o cdigo de um objeto, consulte a Parte1),utilizaremos o evento clique do mesmo.

Me.Text_Recebenome.Text = Me.Text_Nome.Text Me.Text_Nome.Text = ""

Utilizaremos apenas duas linhas de cdigo, a primeira vai fazer que quando clicarmos no boto ela vai atirar tudo o que estiver escrito no Text_1 para dentro do text_2, a segunda linha de cdigo para limpar o text_1.

Para colocar estas linhas de cdigos dentro do boto selecionamos o mesmo e vamos at o menu exibir cdigo ou apenas damos um duplo clique direto no boto para acionar a janela de cdigo.

Tela: 016 ( Selecionamos o a janela de cdigo atravs do menu exibir)

Tela: 017 ( Esta e a janela de cdigo e dentro do evento clique do boto adicionamos o cdigo)

Tela: 018 (Este o cdigo vai executar a funo)

Agora utilize o menu executar para testar o aplicativo, (Para detalhes de como utilizar o menu executar, consulte Parte1.Teste o aplicativo escrevendo um nome qualquer no teste1 e clique no boto executar.

Tela:019 (Para fechar o aplicativo clique no X que esta no canto superior direito do aplicativo)

Chegamos ao fim do nosso exemplo pratico,na prxima parte do tutorial iremos para uma parte muito importante no desenvolvimento da nossa agenda telefnica a analise e o banco de dados.

Concluso:

Nesta parte do tutorial, mostrei na pratica como usar o Editor do Visual Basic do excel e como utilizar as propriedades dos controles tudo mostrado passo a passo com acompanhamento de telas.Bom estudo e at a prxima parte.

Editor de Visual Basic do Excel. Parte 3

Objetivo: O Objetivo deste tutorial aprender a fazer a anlise da agenda telefnica e criar o banco de dados.

Este um dos procedimentos mais importantes, onde definiremos todos os objetos a serem utilizados, e que servir tambm para entender melhor o funcionamento da agenda.

Pr-requisito:

Para voc poder acompanhar este tutorial e o desenvolvimento do aplicativo, ser necessrio ter conhecimento no mnimo do Curso Bsico de Excel e do Tutorial Parte1 e Parte2.

Nota:

Vamos aprender alm de fazer anlise, mais um controle da caixa de ferramentas, o controle Moldura ou Frame, que vai possibilitar dar um aspecto de designer melhor na criao da agenda.

ANLISE

Esta parte pode ser um pouco complicada para voc entender, mas no se preocupe, vou explicar tudo de uma forma simples e objetiva.

Iremos comear a pensar da seguinte maneira: A agenda tem que fazer 05 funes, estas funes deve ser cadastrar, pesquisar, editar, apagar e ajuda. Vamos comear pelo cadastrar, fazendo a seguinte pergunta: Quais os campos que devemos utilizar para efetuar o cadastro?

A resposta pode ser bem objetiva, utilizaremos os seguintes campos, Nome da pessoa, Endereo, Cidade, Bairro, Estado, Cep, Nmeros dos Telefones e a Anotao. Estes campos so os necessrios para o desenvolvimento da agenda, nada impede que uma agenda possua outros campos. Com este campos definidos, temos que utilizar logicamente um formulrio (Detalhes de como criar um formulrio,consulte a parte1), este ser o formulrio principal, ou seja, ser o primeiro formulrio que aparecer na agenda, utilizaremos este formulrio para fazer 04 funes: cadastrar,pesquisa,editar e apagar.Criaremos um formulrio (Detalhes de como criar um formulrio, consulte parte1) s para funo Ajuda. Vamos inserir 06 Botes de comandos(Detalhes de como criar um Boto de Comando, consulte Parte2) no formulrio principal para fazer cada funo, e no formulrio de ajuda apenas 01, estes botes serviro como um menu.

Tambm temos que fazer uma anlise da quantidade de campos que utilizaremos para fazer o cadastro dos nmeros dos telefones, pense da seguinte forma, normalmente

todas pessoas tem mais de um nmero, sendo assim vamos definir o seguintes campos, Telefone Celular, Telefone Residencial, Telefone Comercial e Outros.

Definido todos os campos que utilizaremos para efetuar o cadastro, vamos partir para o campo pesquisar, logicamente pesquisaremos estes dados no formulrio principal.Teremos que fazer outra pergunta, a partir de qual campo utilizaremos para efetuar a pesquisa? Na agenda vamos efetuar a pesquisa somente atravs do campo nome da pessoa.

Agora vamos definir o Editar, toda a vez que quisermos alterar qualquer campo que esteja cadastrado na agenda utilizaremos o comando editar.

O comando Apagar vai fazer a funo, logicamente de apagar os registro do banco de dados, vamos criar uma funo especifica para apagar os registros do banco de dados.

Por ltimo temos que criar um comando de ajuda, voc deve estar se perguntando mas fui eu que criei a agenda? Obviamente saberei utilizar, mas ai eu pergunto para voc, e se outra pessoa quiser utilizar? Voc estar sempre prximo a ela caso tenha uma dvida? sendo que qualquer aplicativo tem uma ajuda, logo o nosso no ser diferente.

Para criarmos este menu de ajuda vamos criar outro formulrio(Detalhes de como criar um formulrio, consulte Parte1), assim a agenda ter somente dois formulrios. A nossa ajuda tem como objetivo de ajudar os usurios a usar os comandos cadastrar, pesquisar e editar e apagar.

Dentro desta anlise vamos definir todos os objetos que utilizaremos no formulrio principal e no formulrio de ajuda, com este procedimento quando chegarmos na parte 4, que ser a criao da interface grfica, apenas vamos inserir os objetos (Detalhes de como inserir objetos, consulte Parte2) e colocar os nomes em suas respectivas propriedades, tambm provavelmente na parte 4 j iremos codificar o aplicativo.

Os objetos e a quantidade que vamos utilizar no formulrio principal sero os seguintes:

QTD 11 06 11 05

NOME DO OBJETO Label Botes de Comando TextBox Molduras

Os objetos e a quantidade que vamos utilizar no formulrio de ajuda sero os seguintes:

QTD 01 01 04 04

NOME DO OBJETO Label Botes de Comando TextBox Molduras

Como eu havia citado no incio deste tutorial, iremos aprender a utilizar mais um controle da caixa de ferramentas, este controle chama-se Moldura ou Controle Frame.

Controle Moldura ou Frame: Utilizado para criar controles funcionais e visuais.

Utilizaremos este controle para dar um designer mais criativo ao nosso aplicativo, e tambm para separamos os campos Nome, Endereo, Cidade, Bairro, Estado e Cep dos campos telefones e do campo anotao,caso voc no tenha entendido bem, no se preocupe na Parte 4 quando iremos criar a interface voc vai entender melhor. Veja o procedimento na tela abaixo para localizar na caixa de ferramenta o controle moldura, os demais procedimentos quanto a inserir no formulrio e editar as propriedades (Consulte as Parte1 e Parte2).

Tela 001 (O controle Moldura aquele que aparece na caixa de ferramenta no lado esquerdo do Boto de Comando)

Concluda esta parte de anlise da agenda , vamos aprender a criar um Banco de Dados e dentro deste criaremos uma tabela para a agenda. Este banco de dados ser a prpria planilha do excel.

Para criar um banco de dados a partir de uma planilha o procedimento bem simples, mas vamos ter que comear analisando o Banco a ser criado.

O Banco de dados de uma planilha do excel pode ser inserido at 65.536 registros porque esta a quantidade de linhas que uma planilha possui e podemos inserir at 256 campos, porque a quantidade de colunas de uma planilha.

Antes de seguir os procedimentos para criar o Banco de dados, vamos definir o nome deste, o qual ser BDAGENDA e cada plan vai ser uma tabela do banco de dados, ou seja, a Plan1,vai ser a tabela onde vamos inserir todos campos , estes campos o quais j esto definidos na parte de anlise, sendo assim vamos dar um nome para a tabela que ser chamada de Agenda. Veja todos os procedimento nas telas abaixo:

Primeiro: Abra o uma planilha do excel e salve com o nome do nosso Bando de Dados, que acabei de citar acima.

Tela 002 ( Abra planilha e salve com o nome BDAGENDA)

Segundo: Na planilha vamos modificar o nome de Plan1 para o nome Agenda, a qual comearemos a chamar de tabela agenda. Toda vs que se referimos ao nome tabela seria a mesma coisa que estivssemos nos referindo a plan1, o que tambm vai ser para o

banco de dados, s que o Banco de Dados se refere a planilha. Veja O Procedimento na tela abaixo.

Tela 003 ( Note na planilha que alteramos o nome que anteriormente era de Plan1 para agenda) Terceiro: Colocaremos os nomes de todos campos que vamos utilizar (Nome da Pessoa, Endereo, Cidade, Bairro, Estado, Cep, Telefone Celular, Telefone Residencial, Telefone Comercial ,Outros e Anotao) em cada uma das colunas comeando pela coluna A, B, C e assim sucessivamente. Iremos modificar cada campo da seguinte forma: o campo NOME DA PESSOA, vamos colocar na tabela como NOME, os campos ENDEREO, CIDADE, BAIRRO, ESTADO E CEP incluiremos os mesmos campos.

J os campos TELEFONE CELULAR mudaremos para CELULAR, o campo TELEFONE RESIDENCIAL para RESIDENCIAL, o Campo TELEFONE COMERCIAL para COMERCIAL, o campo OUTROS e o Campo ANOTAO no iremos modificar.

Esta modifio serve para quando codificarmos o aplicativo tornar o acesso a estes campos mais fcil. Importante ressaltar que os campos devem estar escritos de preferncia em maisculo e em negrito e com uma cor diferente , porque ele servir como cabealho . Veja o procedimento abaixo na a planilha de como deve ficar.

Vamos Inserir os campos na tabela, voc vai notar que na tela abaixo no vai parecer todos campos, motivo a quantidade, ento irei mostrar todos os campos em duas telas:

Tela 004 ( Nesta tela aparece at o campo Residencial)

Tela 005 (Aqui nesta tela aparece o restante dos campos)

Quarto: Na tabela agenda onde est escrito o nome dos campos, vai ser o cabealho e com isso tem que ficar com uma cor diferente, isso deve ocorrer porque quando tivermos acessando o banco de dados preciso identificar os campos abaixo do cabealho.Veja como deve ficar a planilha na tela abaixo:

Tela 006: (Agora sim o nosso cabealho esta pronto)

Quinto: Feito a cabealho, preciso formatar todos os campos da cada coluna da planilha do excel, para quando for entrar texto a coluna do excel deve receber somente texto, assim deve ser feito com os campos onde receber nmeros, datas.

Vamos formatar os campos NOME,ENDEREO,CIDADE,BAIRRO e ESTADO, com a formatao de entrada somente de texto, quanto as campos CEP, CELULAR, RESIDENCIAL, COMERCIAL e OUTRO formataremos para entrada somente de nmeros e o campo ANOTAO iremos formatar como geral, porque como se trata de uma anotao podemos inseri nmeros ou caracteres, para isso vou ensinar apenas como formatar o campo NOME, campo CELULAR e o campo ANOTAO, depois voc deve fazer o procedimento para os demais campos seguindo a ordem de formatao que descrita acima.

Comearemos pelo Campo NOME selecionamos toda a coluna, depois com a coluna selecionada clicamos com o boto direito do mouse e clicamos em formatar clulas a partir janela que aparecer a qual tem o nome Formatar Clulas escolhemos a opo nmero e

categoria texto e clicamos no boto ok,Veja todo o procedimento passo a passo nas telas abaixo:

Tela: 007 (Selecionamos toda a coluna, que contem o campo nome para poder formatar)

Tela 008 (Clicamos em Formatar Clulas)

Tela 009 ( Agora selecionamos a opo nmero)

Tela 010 (Dentro da opo nmero selecionamos a categoria texto e clicamos em ok para concluir a alterao)

Pronto, acabamos de formatar o campo NOME, agora voc deve fazer o procedimento igual para os demais campos que necessitam desta formatao de entrada de texto.

Vamos formatar o campo CELULAR, vou mostrar somente as telas a partir da categoria nmero, para voc chegar at esta tela da categoria, voc deve consultar o procedimento descrito nas telas 007, 008, 009 e 010 sendo que nesta tela a indio para clicar na categoria texto, e agora iremos clicar na categoria nmero e vamos tambm selecionar onde diz: Nmeros Negativos, os primeiros nmeros positivos, feito esta etapa devemos confirmar a alterao clicando no boto ok .Veja na tela abaixo.

Tela: 011 (Selecionamos o campo nmero para fazer a formatao e clicamos nos primeiros nmeros positivos)

Formataremos agora o campo ANOTAO, tambm vou mostrar somente a partir da tela da categoria geral, para voc chegar at esta tela desta categoria tambm dever consultar as telas 007,008,009 e 010 sendo que nesta tela 010 a indio para clicar na categoria texto, mas nos iremos clicar na primeira categoria que aparece que exatamente a que necessitamos,categoria geral, feito esta etapa devemos confirmar a alterao clicando no boto ok.

Tela: 012 (Selecionamos categoria geral e clicamos no boto ok para concluir a formatao)

Terminamos esta parte de anlise do tutorial, agora temos a noo do funcionamento da agenda telefnica. Na prxima parte iremos criar a interface grfica da agenda e provavelmente iremos codifica-la.

Concluso

Nesta primeira parte do tutorial, mostrei como fazer a anlise da agenda , criar o banco de dados,criar uma tabela, inserir os campos e format-los, aprendemos a utilizar mais um controle da caixa de ferramentas que tambm utilizaremos para desenvolver a agenda telefnica, tudo mostrado passo a passo com acompanhamento de telas. Bom estudo e at a prxima parte.

Editor de Visual Basic do Excel - Parte 4

Objetivo: O Objetivo deste tutorial aprender a criar a interface grfica da agenda de uma forma simples.

Pr-requisito: Para voc poder acompanhar este tutorial e o desenvolvimento do aplicativo, ser necessrio ter conhecimento no mnimo do Curso Bsico de Excel e dos Tutoriais Parte1 e Parte2 e Parte3.

Nota: Na parte 3 do tutorial j havamos definidos os nomes dos objetos que iramos utilizar nesta parte 4, iremos incluir mais alguns objetos no nosso aplicativo, isso ocorre porque quando estamos desenvolvendo um aplicativo normal incluir o retirar algum objeto. Por isso que importante a anlise, toda vez que queremos alterar o aplicativo voltamos a refazer a anlise, neste caso no ser necessrio, iremos apenas inserir objetos.

Vou mostrar como deve ficar as duas interface grfica da agenda e depois vou ensinar por quais objetos voc deve comear a inserir primeiro no aplicativo. Utilizaremos a plan2 da planilha do Banco de dados para criar esta interface grfica, ou seja, quando ensinei a criar o banco de dados (Detalhes de como criar banco de dados , consulte Parte 2) me refiro a esta plan2 do banco de dados.

Tela 001 ( Esta interface principal do aplicativo)

Tela 002 ( Esta a interface de ajuda )

Iremos comear a interface grfica pensando da seguinte maneira, temos que criar a interface amigvel, ou seja, de fcil compreenso e utilizao por parte do usurio. Para fazer isso no e muito difcil, basta utilizarmos todos os objetos que j definidos (Detalhes dos objetos definidos, consulte Parte3) de uma forma simples e bem distribuda nos formulrios da Agenda.

Comearemos pelo formulrio principal, na Parte3 onde fizemos a anlise do tutorial definimos os objetos que iramos utilizar. Agora vamos criar o formulrio e inserir todos objetos, depois modificaremos suas propriedades (Detalhes de como inserir e editar as propriedade dos objetos, consulte Parte2).

Vou mostrar o procedimento de como voc deve iniciar a criar esta tela e tambm com quais os nomes os objetos devem ficar aps voc ter inserido o formulrio (Detalhes como inserir um formulrio, consulte Parte1), modifique suas propriedades CAPTION para Agenda , NAME para Principal, HEIGHT para 370,5 e WIDTH para 415,5.

Depois desta parte vamos inserir 05 objetos Moldura (Detalhes como inserir objetos , consulte Parte3) e para modificar suas propriedades CAPTION para Menu, Contato, Telefones, Anotaes e Data, FORECOLOR para Azul e FONT Tahoma, Estilo de fonte Negrito. Veja abaixo nas telas estes procedimentos:

Tela 003 (Este o primeiro procedimento que voc dever fazer, inserir o formulrio e modificar suas propriedades)

Tela 004 (Assim que deve ficar o formulrio principal com a insero das Molduras e com as alteraes nas suas propriedades )

Vamos inserir 15 objetos Label (Detalhes de como inserir objetos label, consulte parte 2) , iremos coloc-las dentro dos objetos Moldura e mudar suas propriedades CAPTION

Nome, Endereo, Cidade, Bairro, Estado, Cep, Residencial, Celular, Comercial e Outro e a dcima primeira label deixaremos ela sem nome, FORECOLOR para Azul. Entenda como voc deve proceder nas telas abaixo:

Tela 005 (Voc deve distribuir as label conforme mostrado na tela acima)

Tela 006 (Depois modificar suas propriedades com os nomes relacionados )

Vamos inserir 12 Textbox, uma observao, para cada TextBox que inserimos sua propriedade NAME esta com o nome de TextBox1, se vamos inserir 06, logo teremos Texbox1, Texbox2 e assim sucessivamente. Vamos mudar a propriedade NAME de cada um

destes TextBox (Detalhes de como inserir e modificar as propriedades do textbox, consulte Parte2), da seguinte forma:

Texbox1 para Text_Nome, Textbox2 para Text_Endereco, TextBox3 Text_Bairro, TextBox4 para Text_Cidade, TextBox5 para Text_Estado, TextBox6 Text_Cep, TextBox7 para Text_Registro, TextBox8 para Text_Residencial, TextBox9 Text_Celular, TextBox10 para Text_Comercial, TextBox11 para Text_Outro e TextBox12 Anotao.

para para para para

Tela 007 ( Os TextBox devem estar alinhados no formulrio com suas propriedades modificadas conforme a tela acima)

Por ltimo vamos inserir 06 botes comando (Detalhes de como inserir os botes de comando, consulte Parte2) e alterar sua propriedades (Detalhes de como alterar propriedades, consulte Parte2) CAPTION para Cadastrar, Editar, Apagar, Ajuda,Pesquisar e Fechar FORECOLOR para Azul,ESTILO DE FONTE para Negrito e sua propriedade NAME iremos alterar da seguinte maneira:

Para cada um vamos colocar o mesmo nome que demos para a propriedade CAPTION, ou seja, para o boto cadastrar, a sua propriedade NAME vai ser Cadastrar assim deve ser feitos para os outros botes.Veja na tela abaixo:

Tela 008 (Os botes de comandos com suas propriedades modificadas, devem ficar posicionados na agenda desta maneira acima)

Concludo a primeira parte da interface grfica , que o formulrio principal, partiremos para construir o segundo formulrio da agenda.

Voc deve comear inserindo o formulrio (Detalhes de como inserir formulrios, consulte Parte2) e modificar sua propriedades (Detalhes de como modificar suas propriedades, consulte Parte2) WIDTH para 364,5 e HEIGHT para 371,25, NAME Ajuda e CAPTION para Ajuda.

Depois voc de inserir 04 Molduras e modificar suas propriedades (Detalhes de como inserir e modificar as propriedades da Moldura, consulte Parte3). Iniciaremos a modificar as propriedades da Moldura1 CAPTION para Cadastrar e FORECOLOR para Azul.

Moldura2, CAPTION para Pesquisar, FORECOLOR para Azul. Moldura3 CAPTION para Editar e FORECOLOR para Azul. Moldura4 CAPTION para Apagar e FORECOLOR para Azul.

Agora dentro destas 05 Molduras vamos inserir 05 Label (Detalhes de como inserir label, consulte Parte2) e iremos apagar a sua propriedade CAPTION de cada uma e na quinta label iremos colocar o nome MENU AJUDA.

Por ltimo iremos inserir um Boto de Comando e modificar sua propriedade CAPTION para Voltar e NAME para Comando_Voltar.

Vamos acompanhar nas telas a seguir todos procedimentos:

Tela 009 ( Inserimos o objeto formulrio e alteramos suas propriedades)

Tela 010 ( Este so as molduras inseridas no formulrio ajuda)

Tela 011 (Estas so as molduras contendo as alteraes feita em suas propriedades)

Tela 012 (Estas so as label inseridas dentro das molduras)

Tela 013 ( Esta a aparncia das label aps termos modificado sua propriedade Caption)

Tela 014 ( Inserimos o boto de comando)

Tela 015 ( Modificamos as propriedades do boto de comando)

Agora voc deve colocar os textos de ajuda para cadastrar, pesquisar, editar e apagar de ajuda dentro de cada label correspondente, da seguinte maneira:

DENTRO DA LABEL CADASTRAR: Para cadastrar os dados da agenda, bem simples, apenas preencha todos os campos da agenda com os dados disponvel da pessoa que voc quer cadastrar, sempre necessrio digitar o nmero do novo registro e clique no boto cadastrar.

DENTRO DA LABEL PESQUISAR: Para efetuar a pesquisa, existe apenas um campo disponvel que o campo nome, ento voc deve digitar o nome da pessoa que deseja localizar e clique no boto pesquisar, caso o nome da pessoa no seja localizado vai aparecer uma mensagem Nome no cadastrado.

DENTRO DA LABEL EDITAR: Para editar os campos da agenda, primeiro efetuamos uma pesquisa para localizar os dados da pessoa, assim que for localizado modifique os dados necessrios e clique no boto editar.

DENTRO DA LABEL APAGAR: Para apagar os dados de uma pessoa, caso eles estejam selecionados clique direto no boto apagar, caso contrrio faa uma pesquisa para localizar o nome da pessoa e clique no boto apagar.

Veja como deve ficar a tela abaixo com a insero dos textos de ajuda no formulrio.

Tela 016 ( Textos inseridos)

Concluda esta parte do tutorial, agora falta pouco para terminar a criao da agenda. Na prxima parte, que ser a ltima, iremos fazer a codifio da agenda.

Concluso:

Nesta parte do tutorial, mostrei como criar a interface grfica do aplicativo, por quais objetos voc deveria comear a inserir primeiro no formulrio, dar nome as propriedades a cada objeto. Bom estudo e at a prxima parte.

Editor de Visual Basic do Excel. Concluso

Objetivo: O Objetivo deste tutorial aprender a codificar o aplicativo Agenda Telefnica.

Pr-requisito:

Para voc poder acompanhar este tutorial e o desenvolvimento do aplicativo, ser necessrio ter conhecimento no mnimo do Curso Bsico de Excel e dos Tutoriais Parte1 e Parte2 e Parte3 e Parte4.

Nota:

Irei apenas ensinar onde deve ser colocado cada cdigo e um breve resumo de sua funo, tambm vou ensinar um cdigo para voc colocar dentro de um boto da planilha plan2 para voc abrir diretamente o formulrio da agenda, com este boto no ser necessrio abrir o editor Visual Basic.

Para iniciramos a codificar a agenda telefnica, voc deve criar uma pasta no seu computador dentro da pasta meu documentos, isso se faz necessrio porque os cdigos do aplicativo esto direcionados para esta pasta que deve estar com o nome de APLICATIVO, dentro da pasta tem que ser criado o banco de dados (Detalhes de como criar banco de dados, consulte Parte2) conforme tnhamos definidos na anlise.

Dentro banco de dados estar tambm os dois formulrios que aprendemos a criar na parte 4, voc deve abri-lo atravs do editor do visual basic (Detalhes de como abrir o editor de visual basic, consulte Parte1) para iniciarmos a codificar da seguinte maneira:

Vamos comear inserindo o cdigo abaixo no Boto Cadastrar, este cdigo faz a funo de abrir o banco de dados, cadastrar, salvar e tambm faz uma funo para que quando voc no cadastrar todos os campos disponveis na agenda o cdigo preenche os campos vazios automtico com o smbolo -, isso se faz necessrio para que quando efetuar uma pesquisa no acha um erro, ou seja , este cdigo faz 04 funes .Veja o procedimento abaixo.

Dim bd As Database Dim rs As Recordset

Set bd = OpenDatabase("C:\Meus documentos\APLICATIVO\AGENDATELEFONICA.xls", False, False, "excel 8.0") Set rs = bd.OpenRecordset("PLAN1$", dbOpenDynaset)

If Me.Text_Registro > Me.Label10 Then If Me.Text_Anotacao = "" Then Me.Text_Anotacao.Text = "-"

End If If Me.Text_Bairro.Text = "" Then Me.Text_Bairro.Text = "-" End If

If Me.Text_Celular.Text = "" Then Me.Text_Celular.Text = "-" End If If Me.Text_Cep = "" Then Me.Text_Cep.Text = "-" End If If Me.Text_Cidade = "" Then Me.Text_Cidade.Text = "-" End If If Me.Text_Comercial = "" Then Me.Text_Comercial.Text = "-" End If If Me.Text_Endereco = "" Then Me.Text_Endereco.Text = "-" End If If Me.Text_Estado = "" Then Me.Text_Estado = "-" End If If Me.Text_Nome = "" Then Me.Text_Nome.Text = "-" End If If Me.Text_Outro = "" Then Me.Text_Outro.Text = "-"

If Me.Text_Registro = "" Then Me.Text_Outro.Text = "-" End If If Me.Text_Residencial = "" Then Me.Text_Residencial.Text = "-" End If

Dim CADASTRO(1 To 12) CADASTRO(1) = UCase(Me.Text_Registro) CADASTRO(2) = UCase(Me.Text_Nome) CADASTRO(3) = LCase(Me.Text_Endereco) CADASTRO(4) = UCase(Me.Text_Cidade) CADASTRO(5) = UCase(Me.Text_Bairro) CADASTRO(6) = UCase(Me.Text_Estado) CADASTRO(7) = UCase(Me.Text_Cep) CADASTRO(8) = UCase(Me.Text_Celular) CADASTRO(9) = UCase(Me.Text_Residencial) CADASTRO(10) = UCase(Me.Text_Comercial) CADASTRO(11) = UCase(Me.Text_Outro) CADASTRO(12) = UCase(Me.Text_Anotacao) CADASTRO(12) = UCase(Me.Text_Registro.Value) Dim AGENDA As Object Dim L, I Set AGENDA = Plan1.Cells(1, 1).CurrentRegion L = AGENDA.Rows.Count + 1 If Len(Me.Text_Registro) = 0 Then

MsgBox "VOC NO DIGITOU NENHUM NOME PARA INCLUSO", vbCritical, "CADASTRO DE ENDEREOS" Else For I = 1 To 12 Plan1.Cells(L, I).Value = Trim(CADASTRO(I)) Next I MsgBox "CADASTRADO", vbInformation, " COM SUCESSO" ThisWorkbook.Save End If End If End If Exit Sub

MsgBox "Digite o cdigo para completar cadastro"

Copie este cdigo acima e acesse o Boto Cadastrar (Detalhes de como abrir o cdigo do Boto de Comando, consulte parte 1), depois cole-o dentro da rea de cdigo do boto.Vou mostrar o cdigo dentro de 2(duas) telas, motivo seu tamanho:

Tela 001 (Primeira visualizao do cdigo dentro do comando cadastrar)

Tela 002 (Restante da cdigo )

Agora vamos fazer o mesmo procedimento para o Boto Editar, esta funo vai possibilitar editar qualquer um dos campos que agenda possui, por causa deste cdigo que tive que acrescentar mais alguns objetos ao formulrio, entre eles uma label que vai nos permitir saber quantos registros o nosso banco de dados tem cadastrado, o que vem ser mais dado til, inserida o cdigo abaixo dentro do boto editar,veja na tela abaixo:

Dim CADASTRO(1 To 12) CADASTRO(1) = UCase(Me.Text_Registro) CADASTRO(2) = UCase(Me.Text_Nome) CADASTRO(3) = LCase(Me.Text_Endereco) CADASTRO(4) = UCase(Me.Text_Cidade) CADASTRO(5) = UCase(Me.Text_Bairro) CADASTRO(6) = UCase(Me.Text_Estado) CADASTRO(7) = UCase(Me.Text_Cep) CADASTRO(8) = UCase(Me.Text_Celular) CADASTRO(9) = UCase(Me.Text_Residencial)

CADASTRO(10) = UCase(Me.Text_Comercial) CADASTRO(11) = UCase(Me.Text_Outro) CADASTRO(12) = UCase(Me.Text_Anotacao) CADASTRO(12) = UCase(Me.Text_Registro.Value) For I = 1 To 12 Plan1.Cells(Val(Me.Text_Registro) + 1, I).Value = Trim(CADASTRO(I)) Next I MsgBox "ALTERAO EFETUADA", vbInformation, "CADASTRO DE ENDEREOS" ThisWorkbook.Save

Tela 003 (funo inserida na janela de cdigo do boto editar)

Vamos para o boto apagar, como o prprio nome j diz, criei uma funo para apagar todos os registros da agenda, somente os que esto selecionados no momento em que voc fez a pesquisa, ou seja, apaga um registro por fez. Veja o cdigo abaixo e inserira na janela de cdigo (Detalhes de como acessar a janela de cdigo, consulte parte 2) do boto apagar.

Dim agenda Resp = MsgBox("EXCLUIR O REGISTRO", vbYesNo + vbQuestion, "CADASTRO ") If agenda = vbYes Then Plan1.Cells(Val(Me.Text_Registro) + 1, 1).EntireRow.Delete ThisWorkbook.Save End If

Tela 004 (Funo inserida no boto apagar)

Veja a funo abaixo do boto ajuda, bem simples ao clicarmos no boto a funo vai abrir o formulrio ajuda.

Ajuda.show

Tela 005 ( uma funo pequena mas que utilizaremos em todos os aplicativos)

O boto fechar a funo quase igual a do boto ajuda,vai servir para fechar o aplicativo.

Tela 006( Funo inserida no boto fechar)

Vamos colocar a funo no boto pesquisar, esta funo vai nos possibilitar fazer a pesquisa pelo campo nome, que tnhamos definido durante a anlise que foi feita no Tutorial Parte 3. Veja o cdigo abaixo e insira no boto pesquisar.

Dim DB As Database Dim rs As Recordset Set DB = OpenDatabase("C:\Meus documentos\APLICATIVO\AGENDATELEFONICA.xls", False, False, "Excel 8.0") Set rs = DB.OpenRecordset("PLAN1$", dbOpenDynaset)

rs.FindFirst "NOME LIKE'" & Me.Text_Nome & "'" '3 se no tiver o registro na tabela termina pesquisa If rs.NoMatch = True Then MsgBox "Nome no cadastrado", vbInformation, "Banco de dados": Exit Sub '4 se localizar pesquisa preenche os campos Me.Text_Registro = rs.Fields("CODIGO") Me.Text_Nome = rs.Fields("NOME") Me.Text_Endereco = rs.Fields("ENDERECO") Me.Text_Cidade = rs.Fields("CIDADE") Me.Text_Bairro = rs.Fields("BAIRRO") Me.Text_Estado = rs.Fields("ESTADO") Me.Text_Cep = rs.Fields("CEP") Me.Text_Celular = rs.Fields("CELULAR") Me.Text_Residencial = rs.Fields("RESIDENCIAL") Me.Text_Comercial = rs.Fields("COMERCIAL") Me.Text_Outro = rs.Fields("OUTRO") Me.Text_Anotacao = rs.Fields("ANOTACAO")

Tela 007 (Funo inserida)

Insira um boto na planilha dentro da plan2 com nome igual ao que esta na tela abaixo(Detalhes de como inserir um boto, consulte parte 2) e dentro dele coloque esta funo Form_Principal, veja o procedimento abaixo:

Tela 008 (Insira um boto e coloque o nome Abrir)

Tela 009 (A funo dever ser inserido dentro da janela de cdigo)

Chegamos ao fim da criao do aplicativo, agora voc j pode utilizar agenda telefnica e com isso facilitar as suas atividades, no prximo tutorial ser sobre como utilizar o Editor de Vba e todas suas ferramentas, este tutorial vai ser muito importante porque todos os outros aplicativos que vamos aprender a desenvolver toda fez que for inserir algum objeto, componente vou fazer referncia a este prximo tutorial.

Concluso:

Nesta parte do tutorial, mostrei todos os cdigos necessrios para que agenda funcione com um breve resumo do que cada funo faz e tambm uma dica para inserir um boto na planilha com o seus respectivo cdigo para abrir a agenda sem ter a necessidade de ativar o editor do visual basic, bom estudo e at o prximo tutorial.

http://www.juliobattisti.com.br/excel120avancado/indice.htm