Livro Excel Avancado

Trusted by over 1 million members

Try Scribd FREE for 30 days to access over 125 million titles without ads or interruptions! Start Free Trial Cancel Anytime.





















































© 2004 b y Di Digge r ati a ti Books Todos os direitos reservados reser vados e protegidos pela Lei 5.988 de 14/12/1973. Nenhuma parte deste livro, sem autorização prévia por escrito da editora, poderá ser reproduzida ou transmitida sejam quais forem os meios empregados: eletrônicos, mecânicos, fotográficos, gravação ou quaisquer outros. D i r etor ial Dir Di e tor Editor ia ia l Luis Matos Editor a-assistente a -assistente Monalisa Neves Redator a Sandra Rita Pinto P r epar visã vissão s ãoo e par ação a ção e Re vi Beatriz Utsumi Capa e Pr ojeto ico i coo o jeto Gráf ic Daniele Oliveira A r te Ar te Patricia Fernandez Ferrari Supor te Aten At endi dime ment nto o ao Le Leit itor or te Técnico ee At [email protected] (11) 3217-2626

Treinamento Avançado em Excel Di ge r ati Dig unicação e Tecnolog ia Ltda. Comunicação ecnologia a ti Com Rua Haddock Had dock Lobo, 347 – 12º Andar CEP 01414-001 São Paulo/SP (11) 3217-2600 Fax (11)3217-2617 www.digerati.com

D Dir Di i r etor e tor e s Alessandro Gerardi Ger ardi – ([email protected]) Luis Afonso G. Neira – ([email protected]) Alessio Fon Melozo – ([email protected])



























Prefácio “Você faz uma vez e o Excel faz o resto “Você r esto por você”. Era com esse ess e bordão que eu iniciava minhas explicações sobre o Microsoft Excel durante as aulas que ministrava. Passados alguns anos, continuo certo de que não existe no mercado nenhuma ferramenta de produtividade – incluindo as “made in Microsoft” Mic rosoft” – tão completa quanto o Excel. Com ele, você precisa apenas gastar algumas horas projetando os cálculos e estruturando as informações, para que depois o software faça tudo automaticamente, mediante um simples comando. Até parece mágica... mágica. .. O Treinamento Avançado em Excel integra uma lista de títulos lançados pela Digerati Books que inclui os livros 101 Dicas de Excel Vol. I e II , Desvendando o Microsoft Excel e Universidade Excel . Este livro, li vro, no entanto, enta nto, tem uma proposta diferenciada: d iferenciada: além de abordar os novos recursos do Excel 2003 e a criação de funções, aborda, em profundidade, profundid ade, a criação cr iação de macros no Excel. As macros permitem gravar seqüências de procedimentos, de modo que você possa executar uma série de ações repetidas repetid as vezes, no momento em que desejar. Por isso, elas são responsáveis pela automatização automatiza ção da maior parte das atividades de quem lida com daVisual Basic for dos e cálculos. Por meio da linguagem VBA ( Visual Applications ), as macros permitem que qu e sejam desenvolvidas desenvolvid as novas funcionalidades dentro do Excel, fazendo com que o programa se torne muito mais do que uma simples ferramenta de produtividade, produtivi dade, ganhando, inclusive, o status de ferramenta de desenvolvimento. É a esse recurso altamente sofisticado que você será apresentado nas próximas páginas. Aproveite para familiarizar-se com ele, para, em pouco tempo, poder colocar o Excel no “piloto automático”, guardando seu tempo livre para coisas mais interessantes... Luis Matos [email protected] Diretor Editorial



























Índice CAPÍTULO 01 Algumas novidades na versão XP ........ ................. ................. .......... 09 Locali Loc alizan zando do pla planilh nilhas as ..... .......... .......... .......... .......... .......... .......... ..... 09 Exibindo Exibi ndo detal detalhes hes ...................... ......................................... ................... 10 Cabeçalhos Cabeça lhos e rodapés................................... rodapés................................... 11 Diagramas Diagr amas ................... ......................................... .................................. ............ 12 Inserind Ins erindo o no nova vass cai caixas xas ..... ......... ......... ......... ......... ......... .... 13 Forma Fo rmatan tando do as caix caixas as do seu seu diagra diagrama ma .. 13 Alterando o layout layout ......... .................. .................. ................ ....... 14 Alinhamento de células ........ ................ ................ ................ ........ 14 Botão Botã o Au AutoSo toSoma ma ..... .......... .......... ......... ......... ......... ......... .......... ......... ...... 15 Desenhand Dese nhando o borda bordass ....................... ...................................... ............... 15 A área de transferência ........ ................. .................. ................ ....... 16

CAPÍTULO 02 Funções Funç ões .......... .............. ......... .......... .......... .......... .......... .......... .......... .......... .......... ......... .... 17 Disponibiliz Dispon ibilizando ando funçõe funçõess ....................... 17 Funções Funçõ es de tex texto to .................. ...................................... ........................ .... 18 Função PR PROCURAR OCURAR................... ................................ ............. 18 Função Fun ção LOCAL LOCALIZA IZAR R ..... .......... .......... .......... ......... ........ ....... ... 19 Funçõess ESQ Funçõe ESQUERD UERDA A e LOCALIZ LOCALIZAR AR ........ 19 Funçõe Fun çõess mat matemá emátic ticas as ..... .......... .......... .......... .......... .......... .......... ..... 19 Função SUBT SUBTOT OTAL AL .................. ................................. ............... 19 Funções Funçõ es estat estatística ísticass ....................... ...................................... ............... 21 Função Fun ção FREQ FREQÜÊN ÜÊNCIA CIA ..... .......... .......... .......... .......... ........ ... 21 Funçõe Fun çõess de data data e hora hora 23



























Ju J unta tan ndo mais de uma cate teggor oria ia de fu fun nçõe õess ...... 24 Função Funçã o PR PROCV OCV ................... ....................................... .................... 24

CAPÍTULO 03 Gerando Geran do gráfico gráficoss automáti automáticos cos ............... ............................... ................ 28 Procur Pro curand ando o dados dados espec específ íficos icos .... ......... .......... ....... 29 Criando o gráf gráfico ico.................. .................................... ........................ ...... 30

CAPÍTULO 04 Noções Noç ões de mac macro ro ..... .......... .......... .......... .......... .......... .......... .......... .......... .......... ..... 33 Macro para cla classif ssificar icar dados em uma uma plani planilha lha .. 33 Formas de executa xecutarr uma macro .................. .................... 35 Tec eclas las de atalho ..................... ...................................... ................. 35 Comandos Coma ndos ..... .......... .......... .......... ......... ......... .......... .......... .......... ....... .. 35 Criando Cria ndo botõe botõess na planilh planilhaa ..... .......... .......... .......... ..... 36 Macro par paraa encontrar encontrar subtota subtotais is................ .................... .... 36 Macros de endereç endereços os absolutos absolutos / relativ relativos os... ... 37 Macros Mac ros com com endere endereços ços absolu absolutos tos .... ........ ...... .. 38 Editand Edit ando o a macro ..... .......... .......... .......... .......... .......... .......... ..... 38 Macros com ender endereços eços relati relativos vos ............ 39 Entend Ent endend endo o o cód códig igo o ..... .......... .......... .......... .......... ......... .... 40

CAPÍTULO 05 O editor do Visu Visual al Basic no Excel Excel................. .......................... ......... 41 A janela do editor do Visual Basic ........ ................. ......... 41 Módulos Módu los ..... ......... ......... ......... ......... ......... ......... ......... ......... ......... ........ .... 43





























CAPÍTULO 06 Exibindo mensa Exibindo mensage gens ns ao usuá usuário rio ............. ............................ ............... 47 Função Funçã o MSGBO MSGBOX X ..................... .......................................... ..................... 47 Outros exe exemplos mplos de mensa mensagem gem ............... ................... .... 48 Capturando Captur ando respo respostas stas do usuário ................. 49 Função Fun ção INP INPUTB UTBO OX ..... .......... .......... .......... .......... .......... ....... .. 50 Adicionando comentários comentár ios ao código códi go......... ............ ... 51

CAPÍTULO 07 Criando um formulá formulário rio no VBA ....................... ............................. ...... 52 Criando um formulário ormulário................ ................................. ................. 52 A barra de ferramentas do formulário .......... 53 Inserind Ins erindo o um controle controle .... ......... .......... .......... .......... .......... ......... .... 55 Criando Cria ndo um form formulá ulário rio simp simples les .... ........ ........ ...... 55 Alterando o nome dos controles .......... .................. ........ 56 A propriedade Caption ........ ................. .................. ........... 56 Alterando os controles do formulário .......... 56 Inserind Ins erindo o uma uma ima image gem m ..... .......... .......... .......... .......... ....... 57 Alterando a ordem dos controles .......... ............ 58 Pr do o ambient ambientee dos dad 58



























CAPÍTULO 08 Manipul Man ipuland ando o cél célula ulass ..... .......... ......... ......... .......... .......... .......... .......... ......... ...... .. 62 Métodos de manipula manipulação ção de célul células as............ .............. 62 Verificando V erificando a área selecionada ......... ............... ...... 62 Inserindo fórmulas em uma célul célulaa ......... 63 O método Select e a propriedade Sel ele ectio ion n .. 63 Exemplo Exem ploss de utili utilizaç zação ão do mét método odo Rang Rangee ... 63 Propried Pro priedade ade Off Offse sett ..... .......... .......... .......... ......... ......... ......... .... 67 Atribuindo valores v alores às células da planilha ..... 67

CAPÍTULO 09 Variáveis V ariáveis de memória memóri a ........ ................ ................ ................. ................. ........... ... 69 Conceito Conc eito de variáv variáveis eis de memória memória .... ......... ......... ...... .. 69 Regras Regr as para nomeação nomeação em VBA ..... .......... .......... .......... ..... 69 Como definir definir variáve variáveis is ..... .......... ......... ......... ......... ......... .......... ..... 70 Declar Dec larand ando o va variáv riáveis eis ..... .......... .......... .......... .......... .......... .......... ....... 71 Escopo das variáv variáveis eis ............... ................................ ...................... ..... 72 Variáveis V ariáveis do nível do procedimento ....... 73 Variável V ariável do nível de módulo ......... ................... .......... 73



























Estrutu Est ruturas ras con condic dicion ionais ais ..... .......... .......... .......... .......... .......... ....... .. 75 As estruturas If ........ ................ ................ ................. ............... ...... 75 A estrutura Case Select ......... ................... .................. ........ 78 Estruturas de looping ................... ................................... ................ 79 Estrutur Est ruturaa Do ... Loop ..... .......... .......... ......... ......... .......... ....... 79 Estruturaa For Estrutur For ... Ne Next xt ..................... .............................. ......... 80 Estrutura For For Each ... Ne Next xt............. ...................... ......... 81 Outros exemplos de criação de loops.... 82 Listan Lis tando do ar arqui quivo voss exis xistent tentes es ..... ......... ......... ......... .... 82 Usando Usand o estrutura estrutura Do ... Until ................ .................... 83

CAPÍTULO 11 Criando funções ................ ................................... .................................... ................. 84

CAPÍTULO 12 Perso Pe rsonal naliza izando ndo o sis sistema tema ..... .......... ......... ......... .......... .......... .......... ......... .... 87 Limpeza dos dados para novo cadastramento 87 Criando uma uma barr barraa de ferra ferramenta mentass ............. ................. 88 Criando uma barra de menus menus internos internos... ... 89 An A nexando uma barr rraa de ferr rraament ntaas ao arquiv ivo. o. 89 Anexando macros a botões ........ ................. ................. .......... 90 Códigos Códig os para para ativar ativar a barra barra de ferra ferramenta mentass .. 90 Ocultando Oculta ndo a barra de ferra ferramenta mentass 91



























Algumas novidades na versão XP Algumas novidades na versão XP Tem novidade no Excel XP? Tem, sim, senhor! A quinta versão do mais enigmático dos aplicativos do Office Offic e traz aqueles pequenograndes aperfeiç ape rfeiçoament oamentos os de praxe. Conheç Conheça, a, neste capítulo, ca pítulo, as ino vações relacionadas à localização de planilhas, cabeçalhos e rodapés e diagramas. Não se esqueça, é claro, da estréia dos novos botões de AutoSoma e Bordas Bordas.

 LOCALIZANDO PLANILHAS Muitas vezes geramos arquivos que depois de algum tempo não lembramos onde guardamos. Para resolver esse es se problema, pr oblema, podemos solicitar ao Excel que faça uma pesquisa em nosso computador. Como? Veja nos passos a seguir: seguir : Ar r quiv Clique no menu A menu A esquisar. q uiv o > Pesquisar Aparecerá uma caixa c aixa de diálogo di álogo do lado direito da tela. Preencha-a da seguinte forma: 1



























Os resultados result res ultado adoss deve ddevem evem m ser: se r: Nesta, que é a última última opção opção do menu, menu, podemos escolher o tipo de arquivo que queremos pesquisar – podem ser arquivos de Word, Excel e Access (ou seja, qualquer arquivo do pacote Office), ou mesmo figuras.

Para iniciar a pesquisa, pressione o botão Pesquisar .

• EXIBINDO DETALHES





























Em versões anteri anteriores ores ao Windows Windows XP XP,,para ocultar ocultar ou visualizar visualizar alguns detalhes existentes na planilha, utilizávamos o menu Ferramentas > Opções Opçõ Op ções, es, habilitando ou desabilitando desabilitando os itens desejados.A partir da versão XP,, o pro XP process cesso o tor tornou nou-se -se mu muito ito mai maiss ráp rápido ido e pod podemo emoss uti utiliza lizarr o men menu u Exibir Exib Ex ibir, ir, que fornece as seguintes opções: • Barra de fórmulas; • Painel de tarefas; • Barra de status.

• CABEÇALHOS E RODAPÉS Nas versões anteriores do Excel, para inserir cabeçalhos era a r > C abeçalho/Rodapé necessário clicar em Exibir Exibir > Conf igur ar beçalho/Rodapé. i gur ar Nessa guia era possível selecionar um tipo de cabeçalho ou rodapé entre os pré-definidos, ou incluir um novo, clicando no botão Pe r sonalizar beçalho cabeçalho beçalho. s onalizar ca Exibir A pa part rtir ir da ve versã rsão o XP, po pode demo moss ag agililiz izar ar ess essaa ta tare refa fa no me menu nuExibir Exibir > Ca beçalho e r odapé Cabeçalho odapé, odapé e criar um novo cabeçalho por meio do mesmo beçalho botão – Pe r sonalizar cabeçalho beça be çalh lho o –, o qual oferece algumas opções opções s onalizar ca que já existiam nas versões anteriores, e outras que são novidades da versão XP: Formata os caracteres selecionados, alterando fonte, tamanho, cor e estilo dos mesmos.



























(*) Insere o código &[Caminho]&[Arquivo], o qual, no momento da impressão, é substituído substitu ído pelo caminho e nome da planilha atual. Insere o código &[Arquivo], o qual, no momento da impressão, impressão, é substituído pelo nome do arquivo. Insere o código &[Guia], o qual, no momento da impressão, é substituído pelo nome da guia da planilha atual. (*) Insere o código &[Figura], o qual, no momento da impressão, é substituído por uma figura pré-selecionada. (*) Formata a figura selecionada, permitindo alterar sua largura e altura, ou mesmo recortá-la. (*) Comandos incorporados a parti partirr da versão versã o XP. XP.

• DIAGRAMAS Para inserir diagramas no Excel, clique em Inserir Inserir > Diagramas e siga estes passos: 1

Escolha o tipo de diagrama que preferir.



























Inserindo novas caixas Também é possível inser in serir ir novas caixas em seu s eu diagrama. dia grama. Para isso, faça o seguinte: 1

Clique na caixa que deseja d eseja reproduzir.

ma. Em seguida, seguid a, clique no botão Inser ir ir f o r ma ma . Isso fará com que a nova caixa seja inserida logo abaixo da caixa selecionada. 2

3

Tendo feito isso, basta digitar o texto desejado.

Formatando as caixas do seu diagrama Para dar uma aparência pessoal aos seus diagramas, dia gramas, a nova versão do Excel oferece opções especiais: 1 2

Dê um duplo clique sobre a caixa que deseja personalizar personalizar..

Aparecerá a caixa de diálogo de formatação, na qual é possível fazer as seguintes alterações:



























Fonte – permite alterar tamanho, ta manho, cor cor,, estilo e efeitos efeit os da fonte, além dela própria. Alin Al inha hame ment nto o – permite per mite alterar a lterar o alinhamento a linhamento do texto dentro da caixa. Cor Co r es Linha Lin hass – permite alterar as cores de preenc preenchimento, himento, e s e Linhas da linha (moldura) da caixa e das setas (quando existentes). Tamanho aman am anho ho – permite per mite dimensionar, dimensionar, girar e alterar a escala da caixa. Proteção Prote Pro teção ção – (*) permite bloquear bloquear a caixa caixa e o texto texto existente nela. nela. Mar Ma r gens en s – permite alterar as margens margens do texto dentro da caixa. W e b – em alguns navegadores irá exibir eb exibir um texto alternativo para facilitar a pesquisa de objetos, mas no caso de figuras, esse texto é ignorado. (*) Para que este comando seja executado, é necessário proteger a planilha.

Alterando o layout Para alterar o layout l ayout das caixas, siga estes passos: 1

Selecione a caixa desejada.

2

out Dê um clique no botão L a y ou out. ou t

3

Escolha um dos layouts existentes.



























V e r tical tica ti call – altera o alinhamento vertical vertical (de cima para baixo) do t ical conteúdo de uma célula. Contr ole xto texto xt o – esta opção oferece três possibilidades: possibilidades: o le de te Retor no xto texto xto – alinha a linha o texto texto em mais de uma uma linha; no automático de te Reduzir par a ajustar ajust aju star ar – reduz o tamanho tamanho da fonte fonte para para que todo o conteúdo da célula seja apresentado dentro dela; Mesc lar células Mesclar célul cé lulas as – alinha o text texto o em mais mais de uma célula ao mesmo tempo, recurso bastante utilizado para casos em que os títulos estão na primeira linha. O r ientação ientação i entação –– permite rotacionar o texto dentro da célula. Dir eção xto texto xt o – permite permite alterar a ordem ordem de leitura dos dos dados exiseção do te tentes na célula, que pode ser da esquerda para a direita ou o contrário.

• BOTÃO AUTOSOMA





























1

bordas Ative o botão Desenhar bordas.

2

Clique no botão Estilo da linha:

3

Clique no botão Cor da linha:

Aparecerá um lápis indicando que deve ser riscada a célula na qual desejamos criar a linha:

• A ÁREA DE TRANSFERÊNCIA Par araa col colar ar um ob obje jeto to ut util iliz izam amos os o bot botão ão

, o qual qual ins inser eree na popo-



























Funções As fu funç nçõe õess sã são o o ce cent ntro ro ne nerv rvos oso o do Ex Exce cel.l. Nã Não, o, nã não o se tr trat ataa de re recu curs rsos os que causam chiliques a torto e a direito. Muito pelo contrário: é por meio das funções que conseguimos agilizar cálculos e elaborar planilhas sofisticadas. E há funções para todo tipo de operação. Desde as somas mais simples até intrincadas fórmulas estatísticas, estatís ticas, esse é o caminho das pedras! Neste capítulo, trataremos de uma parte muito importante do Excel: as funções avançadas de texto, matemática, estatística e de data e hora.Afinal de contas, por mais que se trabalhe com uma ferramenta, fer ramenta, há sempre alguma algu ma coisa a aprender! apr ender! Aqui, você vai aprender a: • Adicionar novas funções ao Excel por meio de suplementos; • Localizar textos e códigos em células;



























análise Habilite a caixa de seleção Ferramentas Ferrament Ferr amentas as ddee an álise par paraa que que todas todas as funções fiquem disponíveis. Para inserir funções, utilize o botão deInserir de Inserir função . Confira, agora, algumas funções interessantes:

• FUNÇÕES DE TEXTO Função PROCURAR



























Célula Célu Cé lula la com o tex ttexto exto to – é o endereço da célula em que o símbolo símbolo,, valorr ou texto deve ser procu valo procurado. rado. No- inicial inic in icia iall – é o parâmetro parâmetro no qual você você pode especificar a partir de qual caractere a pesquisa deve ser iniciada. É possível, por exemplo, procurar o símbolo # a partir da posição 20. Caso você não n ão especifique o número inicial, o Excel vai considerar que a pesquisa pesqui sa deve ser iniciada a partir do primeiro caractere ( 11). ). No exemplo a seguir se guir,, o Excel vai localizar locali zar o símbolo # dentro do conteúdo da célula cé lula A2:

Função LOCALIZAR Outra função que faz pesquisa de caracteres é a LOCALIZAR. A di dife fere renç nçaa en entr tree el elaa e a fu funç nção ão PR PROC OCUR URAR AR é qu quee a se segu gund ndaa fa fazz di dist stin inçã ção o entre maiúsculas e minúsculas, enquanto a LOCALIZAR LOCAL IZAR não faz:



























número da função ; células a calcular =SUBTOTAL ( número )

Em que: Número Núme ro da função fun ção – é um número número entre entre 1 e 11 que que especifica especifica qual qual função deve ser usada para calcular o subtotal. No Excel, cada função corresponde a um número, como mostra a tabela a seguir: Número da função

Função

1

MÉDIA

2

CONTA

3

CONT.VALORES

4

MÁX

5

MÍN

6

MULT





























• FUNÇÕES ESTATÍSTICAS Função FREQÜÊNCIA Calcula a freqüência de determinados valores dentro de um intervalo de valores, retornando retornando uma matriz. Imagine que você tenha, por exemplo, uma representação de veículos, veículos , e queira saber o número de modelos, por cidade, que se encaixam em determinadas faixas de preço – isto é, a freqüência dessas faixas de preço entre os modelos de carros. Esse exemplo pode ser observado na tabela da figura a seguir:



























4

O K Selecione a função FREQÜÊNCIA e dê OK OK.



























• FUNÇÕES DE DATA E HORA Função Fun ção DA DAT TADIF Para calcular a diferença entre duas datas, levando em conta o número númer o de dias, meses ou anos, an os, use a função fun ção DA DAT TADIF ADIF,, que possui a seguinte sintaxe: data_inicial;data_final ;tipo de diferença desejado =DATADIF( data_inicial;data_final )

Na qual tipo de diferença desejado pode ser representado como:



























• FUNÇÕES DE INFORMAÇÕES As fu funç nçõe õess de in info form rmaç açõe õess sã são o aq aque uela lass qu quee an anal alis isam am fó fórm rmul ulas as e co cond ndi-ições e res respondem pondem com com VERDADEIRO ou FALSO.Elas são são bastante bastante úteis úteis para verificar o tipo de conteúdo de determinadas células, se estão vazias ou não, se estão preenchidas preenchidas com textos ou números etc. A tabela a seguir seguir mostra exemplos das principais funções lógicas:



























Para verificar qual é o nome de determinado filme (título), siga estes passos: 1

Nomeie a área com o catálogo dos filmes como FITAS, selecionando as células e indo ao menu Inserir Inserir > Nome > Definir Defin De finir; ir; ou então digitand digitando oo de nome nome e pressionando Enter. nome diretamente na Caixa de

2

Crie a tabela com os dados das vendas.





























Pressione OK OK;; com isso, será informado o nome do filme que você OK está procurando. Copie para as células abaixo. 8

9

Experimente alterar o código do filme para ver o Excel preencher preen cher



























Deixe o cursor no primeiro PROCV (título do filme) e pressione o botão Inserir Inse In seri rirr funç ffunção unção ão para editar editar o conteúdo conteúdo da fórmula, pois agora agora você vai adicio adicionar nar as funçõe funçõess SE e ÉERRO ÉERROS. S. 3



























Gerando gráficos automáticos

Gerando gráficos automáticos



























6

Insira um controle de caixa de combinação, clicando neste botão:





































































































































































































































































































































































































































































































































































































































































































































































































































































solicitar ao VBA que execute o script passo a passo, o que pode ser feito pressionando a tecla F8. Depois de fazer isso, você verá que o Excel consegue definir cada uma das variáveis, mas continua parado na primeira linha do procedimento. Isso acontece porque as variáveis foram fora m definidas, mas ainda não têm valores associados. Pressione Press ione F8 sucessivas vezes para que todas as variáveis sejam vistas:

Quando o procedimento chega ao fim, as variáveis são zeradas, e o módulo nem ao menos se lembra de que elas foram utilizadas. A janela V ar iáv a r iá ei llocais ocai aiss permite que você você saiba qual qual valor valor está realmente realmente ariá v eis eiss loc mazenado na memória naquele instante. Essa propriedade é muito útil nos casos em que deparamos com um erro de cálculo cálc ulo e não sabemos o que o Excel está tomando como base. As variáveis podem armazenar valores e objetos. Para atribuir um valor a uma variável, podemos digitar dig itar seu nome, o sinal de igual e o valor que deve ser atribuído a ela: Nomedavariável = valor

• DECLARANDO VARIÁVEIS O VBA não exige que as variáveis var iáveis sejam seja m declaradas, declaradas , mas o ideal id eal é fazê-lo fazê-l o sempre. sempr e. Aliás A liás,, existe, no VBA, um recurs recu rso o padrão padrã o para decladecl arar as variáveis automaticamente, por meio da instrução Option



























Ao declarar uma variável, estamos solicitando ao VBA que reserve um certo espaço na memória para armazenar o conteúdo dela. Existem diversos tipos de variável (dependendo (depend endo do tipo de valor que ela pode receber,, como caractere receber caracteres, s, números, valores lógicos l ógicos etc.). Especi Especificand ficandoose o tipo da variável, minimiza-se o espaço de memória a ser reservado para ela. A declaração de variáveis é feita de acordo com esta sintaxe: sin taxe: Dim nomedavariável As As tipodavariável Em que: D Dim Di i m – é o termo proveniente proveniente de dimensionar , que, por sua vez, Dii m faz com que uma determinada quantidade significa alocar. O D Dim de memória seja alocada para a variável. Como dissemos no início do capítulo, você pode utilizar a instrução Option Opt ion Explicit Expli Ex plici citt (na seção de declarações, que fica no no início do procedimento) para que o VBA passe a exigir que todas as variávar iá veis sejam declaradas. Uma vez incluída essa instrução, o VBA verifica o código na primeira vez em que o procedimento de um módulo é executado, para assegurar que todas as variáveis tenham sido declaradas. Caso não encontre e ncontre alguma das declarações declarações,, ele pára exatamente no ponto em que encontrou a variável não declarada, e retorna um aviso a respeito.

• ESCOPO DAS VARIÁVEIS O escopo de uma variável refere-se ao domínio dentro do qual ela pode ser acessada. O VBA permite que a variável tenha um destes níveis de escopo: • Disponível somente no procedimento; • Disponível somente no módulo; • Disponível somente na pasta de trabalho; • Disponível em todas as pastas de trabalho.



























Variáveis V ariáveis do nível de procedimento Para declarar uma variável cujo escopo seja restrito ao procedii m Assim, ela mento em que ela se encontra, utilize a instrução D Dim. ficará disponível somente nesse procedimento, procedi mento, e nenhum outro poderá acessá-la. Sub DefineVariáveis() Dim ctNome As String Dim curSalário As Currency Dim dtDataInício As Date .... End Sub

Variáveis V ariáveis do nível de módulo Para declarar uma variável de escopo restrito a um único módulo, ate inclua-a na seção de declarações usando a palavra-chave P r i v at ate: at e Option Private Module Private NomeLivro

D i m no lugar ate No caso, poderíamos utilizar u tilizar Di Dim Di lugar de P r i v at segunat e na segunda linha do código, mas, para enfatizar as variáveis declaradas no ate início do módulo, a instrução mais utilizada é a P r i v at ate. at e

Variáveis V ariáveis de nível global Para declarar uma variável disponível a todos os módulos exisPub bli lic c sem a instrutentes na pasta pas ta de trabalho, use a palavra-chave Pu ção Option Pr i v ate at e Module Modu Mo dule. le. O resultado será uma variável variável chamaa te da Global Globa Gl obal, l, que deverá ser declarada na seção de declarações: Public

strNomeLivro

• TIPOS DE VARIÁVEL Os tipos de variável disponíveis no VB VB são:



























s o d a d e d o l a v r e t n I

e s l a f u o e u r T

a d i r e u q e r s e a t i y r ó b m 2 e M

a 8 8 0 0 8 8 5 , 5 , 7 7 7 7 4 . 4 . 5 5 8 8 6 . 6 . 3 3 0 0 2 . 2 . 7 7 3 3 3 . 3 . 2 2 2 2 9 9

s e t y b 8

e d 1 3 a 9 0 9 0 9 1 9 e e d d o o r r i b e m n a e j z e e d d 1

s e t y b 8

– a 8 4 0 2 3 3 e e 2 4 3 2 2 1 2 4 6 8 8 5 4 4 3 6 1 5 3 6 9 0 6 4 7 9 . 9 4 7 . 1

7 6 7 . 2 3 a 8 6 7 . 2 3 -

8 4 6 . 3 8 4 . 7 4 1 . 2 a 8 4 6 . 3 8 4 . 7 4 1 . 2 -

a t s o p s e R t n V

a l c e T t y B

g n S

r t S

t n V

t y B

e l g n i S

g n i r t S

* t n a i r a V

e t y B

s e t y b 4 s o r u J a x a T g n S

g n L

g n o L

o t s u C r u C

o t g P t D

t n o C b D

o x i f e r P

n l B

r u C

t D

b D

t n I

n a e l o o B

y c n e r r u C

e t a D

e l b u o D

r e g e t n I

0

e m o N m i r P r t S

s e t y b 4

y d a e R n l B

o t n e ) o m t i r x p t e m ( o g c i n + t r s s e a t y b d 0 1

e t y B

5 5 5 2 5 2 a a 0

e t y b 1

s e t y b 2

o l p m e x E

e s t n e e r e t m a c a d a r a m i c e x d o r s e p a õ a h l i o r b e Z 2

s e t y b 6 1

s e t y b 8

s o s h l a i d F s n e o t V g Q t n n L I

s o d a d e d o p i T

5 4 E 8 9 2 1 0 4 . 1 – a 8 3 E 3 2 8 2 0 4 . 3 -

(*) V ar (*) V ia nt é um tipo especial de variável, que pode conter qualquer ar iant iant tipo de dado. Se, na declaração de uma variável, variáve l, não for especificado o tipo, o Excel automaticamente automaticamen te irá criar uma u ma variável V variável V ar iant, ia nt, que requer ar iant iant mais espaço de memória do que os demais tipos.



























Estruturas de programação Seus amigos o chamam para ir ao cinema em um dia cinzento.Você, resfriado, responde: “Se não chover eu vou, mas, se chover, prefiro ficar em casa...”. Pronto! Você acaba de usar uma estrutura de programação condicional. Como você vê, não é necessário ser um daqueles gênios dos filmes de ficção adolescente para compreender princípios de programação. Fluxos de código são mera questão de lógica. Você só precisa se familiarizar com a linguagem de programação e treinar um pouco. Neste capítulo, você verá como criar rotinas de programação que tomem diferentes decisões de acordo com a escolha do usuário, fazendo uso das estruturas de programação. No sistema de cadastro que você está construindo, por exemplo, vamos fazer com que o texto inserido na planilha varie conforme conforme a opção que o usuário tiver escolhido no formulário.

 ESTRUTURAS CONDICIONAIS As estruturas es truturas condicio condicionais nais criam cr iam situações si tuações em que o programa deve decidir por qual caminho seguir, de acordo com o resultado de um teste condicional.

As estruturas If As estrut estruturas uras do tipo If If I f disponibilizam opções para avaliar a entrada de dados do usuário, e executam afirmações em uma condição básica como resposta. Embora tenhamos três variações da estrutura IIf,f todas elas são iniciadas com a declaração I f f ... ... Then e, em geral, terminam com End If If. Essa declaração avalia se uma condição é verdadeira ou falsa, e direciona o fluxo do programa de acordo com o solicitado. Se mais de uma condição condiçã o na estrutura é verdadeira, somente o código cód igo especificado como primeira condição verdadeira será executado. • If ... Then





























If [condição] Then Claúsula If Esse Repare que, nesse modelo, não usamos a instrução End If. tipo de declaração pode ser usado nos casos em que a estrutura I f se resumir a uma simples linha, como neste exemplo: Sub PreencheDatas() Dim MinhaData As String MinhaData = InputBox(“Digite o mês no _ formato MMM-AA”) If MinhaData <> “” Then MsgBox “Continuar _ a macro” End Sub

If [condição] Then Claúsula End Sub Nesse segundo tipo de sintaxe, a cláusula da estrutura não está na mesma linha em que se s e encontra a palavra Then Then. Th en. Ou seja, a estruestr utura se estende por mais de uma linha. Nesse caso, devemos fecháIf como no exemplo a seguir: la com End If, Sub Demonstra If() If ActiveSheet.Name <> “EXEMPLO” Then MsgBox “Você está na planilha errada!” End If End Sub

• Aplica Aplicando ndo a estrutura IIff no formulário



























1

Abra o arq Abra arquiv uivo o com o sis sistem temaa de cad cadast astro. ro.No edi editor tor do VB VBA, A,dê um duplo clique sobre o botão cmdOK , para acessar seu código. Agora você vai adic Agora adiciona ionarr uma estru estrutura tura I f f para testar se a caixa de opção optVista está ativada. ativada. Porta Portanto, nto, precis precisamos amos substi substituir, tuir, no código, código, as linhas referentes ao controle optVista por novas instruções. Para fazer isso, procure as seguintes linhas no código do botão cmdOK : 2

ActiveCell.Value = Me.optVista.Value ‘Desloca o intervalo uma célula para a direita. ‘Armazena o valor de optVista.

E substitua-as por estas: If Me.optVista = True Then ‘verifica se optVista ‘está ativado ActiveCell.Value = “À vista” ActiveCell.Offset(0,1).Select ActiveCell.Value = “0” ‘número de parcelas ‘é 0 txtParcelas.Enabled = False Else ActiveCell.Value = “Financiado” ActiveCell.Offset(0,1).Select ActiveCell.Value = Me.spiParcelas.Value End If

Com essas linhas de código, se o usuário selecionar a opção optVista , a célula correspondente na planilha será preenchida com o valor “À vista”. Do contrário co ntrário,, será preenchida com o valor “Financiado”. Vamos, agora, inserir instruções para verificar se a caixa chkNovo foi ativada. Ainda no código cód igo para o botão cmdOK , procu3



























If Me.chkNovo.Value = True Then ActiveCell.Value = “SIM” Else ActiveCell.Value = “NÃO” End If

Essas linhas fazem com que, se o usuário for um cliente novo, a célula correspondente correspond ente na planilha seja preenchida com o valor SIM e, se não for, ela seja preenchida com o valor NÃO .

A estrutura Case Select Esta estrutura é ideal para testar um valor dentre vários possí veis. Sua sintaxe sin taxe é: é: Select Case [expressão] Case [expressão 1] Declaração Case [expressão 2] Declaração .. . … Case [else] Declaração End Select A estrutura Case Select Select avalia o resultado da expressão uma única vez, comparando-o, depois, com outros valores, para determideter minar qual bloco de código será chamado. Case Vamos V amos utilizar utilizar Case Ca se Select Sele Se lect ct para manipular manipular os dados dados a respeito respeito do número de parcelas em nosso sistema de cadastro. Siga estes passos: 1

No código do botão cmdOK , procure esta linha:



























MsgBox (“Tome cuidado... os juros vão _ aumentar.”) Case 3 MsgBox (“Nossa, aqui não é Kazas do _ Norte!”) Case 4 MsgBox (“Tá mal... agora agüenta!”) End Select

Case somente uma das declarações Em uma estrutura Select Select Case, disponíveis será executa executada. da.

• ESTRUTURAS DE LOOPING Diferentemente das estruturas condicionais, as de looping (ou de repetição) permitem que uma mesma instrução seja executada executada repetidas vezes. É possível estipular um número definido de vezes que o programa deve rodar, ou atrelar esse valor a uma condição.

Estrutura Do ... Loop Esta estrutura pode ser utilizada nos casos em que desejamos repetir um mesmo bloco de instruções até que determinada condição seja satisfeita, ponto em que o código sai do loop e passa a executar execut ar a próxima instrução. Para sair de uma estrutura Do ... Loop Loop deve-se utilizar a instrução Exit Ex it Do Do. O ideal é usá-la após a avaliação de alguma condição, condi ção, como, por Then exemplo, If ... ...Then Then. Nesse caso, se a condição for verdadeira, o procedimento passará para a instrução existente imediatamente após o loop . Do [bloco de instruções]



























‘armazenar números inteiros. Contador = 0 ‘ Inicializa a variável Contador. Do ‘ Inicia o loop MsgBox “O contador está em: “ & Contador Contador = Contador + 1 ‘ Incrementa Contador. If Contador = 3 Then ‘ Se a condição for True, MsgBox “Contador foi ativado três vezes” Exit Do ‘ sair da instrução Do. End If Loop Until Contador > 3 MsgBox “Saímos do loop agora.” End Sub

Para visualizar o funcionamento desse procedimento, vá até a primeira linha do código e pressione a tecla F8. Você verá que o Excel lê e executa a linha de código, passando então para a linha seguinte, e prosseguindo até o final do bloco de instruções.

Estrutura For ... Next xt faz com que um bloco de instruções rode A estru estrutur turaa For ... Ne Next um número predefinido de vezes. Esse número é estabelecido logo na xt primeira linha. A última linha deve conter apenas a palavra Ne Next x t. Entre xt essas duas instruções ( For ... Ne Next xt), insere-se o código a ser repetido. For Condição [bloco de instruções ]





























Sub DemonstraNext() Dim Contador As Integer ‘Define a variável Contador como um número ‘inteiro. ActiveSheet.Range(“A1”).Select ‘Posiciona o cursor em A1. For Contador = 1 To 10 ‘Executa a mesma instrução até que Contador ‘atinja o valor 10. ActiveSheet.Range(“A” & Contador).Select ‘Seleciona a coluna A + Contador (cujo ‘valor inicial é 1). ActiveCell.Value = Contador ‘Atribui o valor de Contador à célula A1. Application.StatusBar = “Estamos na linha _ “ & Contador ‘Exibe na barra de status o texto ‘“Estamos na linha:” + o valor de Contador. Next ‘Executa as mesmas instruções novamente. MsgBox (“Fim do contador”) ‘Após executar o bloco 10 vezes, exibe a ‘mensagem “Fim do contador”. End Sub



























For each Condição [bloco de instruções ] Next h ... Ne x tt: Veja V eja um exemplo exem plo de utilização ut ilização do d o For Eac Each Nex Sub DemonstraForEach() Dim Plan As Object ‘Declara a variável Plan como tipo Objeto. Workbooks.Add ‘Adiciona nova planilha. Worksheets.Add ‘Adiciona uma nova guia. For Each Plan in This Workbook.sheets ‘Para cada planilha existente na pasta, Range(“A1”).Value = Plan.Name ‘a primeira célula irá conter o nome ‘da planilha. Next ‘Muda de planilha. End Sub

Outros exemplos de criação de loops As estrutur estruturas as de looping podem ser usadas para aplicar inúmeros recursos aos seus s eus programas. pr ogramas.Veja um exemplo interessante: inte ressante:

Listando arquivos existentes



























‘Atribui o nome do arquivo (diretório) à ‘variável Arquivo. Cells(Linha, 1) = Arquivo ‘A célula atual exibe o nome do arquivo ‘(conteúdo da variável). End Sub

Usando estrutura Do

... Until

O código do exemplo anterior mostrava apenas um arquivo do diretório (no caso, o primeiro de uma lista). Se você quisesse prolongar esse mesmo código para que ele listasse todos os elementos de uma lista contendo 200 arquivos, ele ficaria imenso, e o trabalho exigido seria desumano. Para conseguir esse ess e resultado de maneira inteligente e sem suar a camisa, use a estrutura Do ... Until Until,l, de modo Unti modo que a execu execução ção do bloco de instruções seja repetida até a aplicação não encontrar mais nenhum arquivo .xls no diretório. Para isso, utilize este código: Sub ListaArqs() Dim Linha As Integer Dim Arquivo As String ‘Declara a existência das variáveis Linha ‘e Arquivo. Linha = 1 ‘Atribui o valor 1 à variável Linha. Arquivo = Dir(“*.xls”) ‘Armazena o nome do arquivo .xls na variável ‘Arquivo.



























Criando funções O Excel tem mais de 400 funções. É função a rodo! A maioria dos usuários conhece apenas uma parte delas, já que algumas atendem a necessidades muito específicas, de interesse para poucas pessoas. Mas, mesmo dispondo dessa enorme quantidade de funções, você pode querer ou precisar de alguma que não conste da lista. O que fazer? É simples: crie a sua própria função! Veja, V eja, neste capítulo, como desenvolver des envolver o código códi go para uma funfu nção de cálculo cál culo de financiamento fina nciamento simples. si mples. Uma vez criada, cria da, ela poderá ser usada us ada quantas vezes você quiser, exatamente como qualquer função nativa do Excel.

• CRIANDO FUNÇÕES Sub ubb, b com a qual desen Até aqui, você trabalhou com a instrução SSu Sub, desen volveu suas macros. macros. Para cria criarr funções, vamos começar a usar a instrução Function Func Fu ncti tion. on. As funções criadas ficam ficam armazenadas armazenadas na lista de funções do Excel, juntamente com as demais, como SOMA, MÉDIA, DATA etc.. Elas modificam apenas valores nas planilhas, nunca sua estrutura ou características. Para criar uma função, devemos utilizar a seguinte sintaxe:



























Function FACADA (Empréstimo As Currency,_ Juros

As

Single,

Parcelas

as

Integer)

As

Currency ‘Esta função precisa de três argumentos: ‘Empréstimo – do tipo Currency (moeda), ‘Juros – do tipo simples e ‘Parcelas – do tipo inteiro FACADA = Empréstimo * (1 + Juros) ^ Parcelas ‘Ao entrar com os valores de empréstimo, ‘vai ‘va i calcul calcular ar o valor dos juros elevado elevado ao ‘número de parcelas. ‘Todas as instruções serão armazenadas na ‘função ‘funçã o conhecida como FACADA. FACADA. End Function

Vamos, V amos, agora, testar a função criada: cr iada: 1

No Excel, construa a seguinte planilha:

_





























3

FACADA A função fun ção que q ue você criou ( FACADA ) vai estar listada no menu.

4

Procure-a e dê um clique sobre ela. Depois, preencha os cam-



























Personalizando o sistema O Excel possui algumas barras de ferramentas e uma barra de menus padrão para agilizar o trabalho. Mas você também pode criar suas próprias barras e menus, reunindo nela as funcionalidades que costuma usar com mais freqüência. E mais: é possível criar no vos botões para as a s macros que você voc ê porventura por ventura tenha t enha desenvolvid esenvolvido no Excel. É como brincar br incar com um jogo de montar, montar, cujo resultado seja um ambiente de trabalho personalizado. Neste capítulo, você verá como criar e manipular barras de ferramentas e menus tanto por meio de linhas de código quanto por meio de comandos.

 ROTINA DE LIMPEZA DOS DADOS PARA NOVO CADASTRAMENTO



























Me.lblVeículo = “” Me.chkNovo = False Me.txtNome = SetFocus

• CRIANDO UMA BARRA DE FERRAMENTAS Qualquer aplicativo do Windows pode conter várias barras de ferramentas; você pode, inclusive, criar uma, utilizando comandos ou por meio de códigos. Criar uma nova barra de ferramentas utilizando comandos é muito simples: 1

Em um novo documento do Excel, vá ao menu Fer r ramentas amentas > Per sonalizar sonalizar Exibir > Bar r sonalizar. sonalizar ou Exibir ras as de f er er r ramentas a mentas > Per sonalizar sonalizar 2 3

Bar r r Clique na guia Ba amentas, r as a s de f e r r r amentas a mentas e em seguida, em N o v a

Na caixa Nome da bar r r a de f e r r ramentas amentas, a mentas nomeie a sua barra OK K como CADASTRO DE VEÍCULOS e clique em O OK:



























7

Se houver necessidade de alterar o texto ou a figura do botão, seleção basta pressionar o botão Modif icar i car seleção. 8

Após arrastar todos os comandos desejados para a barra, clique har r em Fe cha har.

Criando uma barra de menus internos Em vez de criar uma barra de comandos com botões, botões , você pode construir uma barra de menus contendo diversos comandos. Mas lembre-se: é aconselhável manter em uso apenas a barra de menus padrão do Excel (conhecida (c onhecida como barra bar ra de menus da planilha). pla nilha). De qualquer modo, se sentir necessidade de uma barra personalizada, basta seguir estes passos: 1

Vá ao menu Fe r r sona so naliliza zar, r, e clique clique na guia Barramentas a mentas > Pe r sonalizar s onalizar r a de f e r r ramentas amentas. a mentas 2

Clique no botão No v a e nomeie a nova barra de ferramentas. Clique



























• ANEXANDO MACROS A BOTÕES Uma possibilidade interessante interessante é a de acrescentar botões personalizados à sua barra de tarefas. Você pode, por exemplo, anexar uma macro a um botão persona personalizado. lizado. Veja como fazer isso: 1

Com a sua barra de ferramentas personalizada aberta, vá até o menu Fe r r sonalizar. ramentas a mentas > Pe r sonalizar s onalizar 2

Dê um clique na guia Comandos Comandos.

3

o r iias, ias ia Na caixa Categ Catego aass selecione Macr o ss.

4

Clique em Pe r sonalizar sonali son alizar zar botão botã o e arraste-o arraste-o para para sua sua barra. barra. s onalizar

5

Para atribuir uma macro ao botão, pressione Modif icar seleção. icar seleção

6

Atr At r ibuir Clique Cliq ue sobre o nome da d a macro deseja de sejada, da, e, depo depois, is, em em At ibuir. i buir





























3

Digite as seguintes instruções: Private Sub Workbook_Open() MsgBox “Bom dia; este é o sistema de _ cadastro de vendas.” ‘Mensagem de abertura Application.CommandBars(“CADASTRO DE _ VEÍCULOS”).Visible = True ‘Abrir barra de ferramentas caso esteja ‘fechada. End Sub



























• ALTERANDO A POSIÇÃO DE UMA BARRA DE FERRAMENTAS Veja ago Veja agora ra com como o mudar mudar a posiç posição ão de uma uma bar barra ra de de ferra ferramen mentas tas na tela. No exemplo a seguir, vamos posicionar a barra personalizada CA- DASTRO DE VEÍCULOS na parte direita da área de trabalho do Excel: 1

Novamente no código do objeto W objeto W o r kbook kboo kb ook, k, logo acima da insk book Sub digite: trução End Sub, Sub MudaBarra()



























• DESABILITANDO UM ITEM DA BARRA Assim como podemos desabilitar uma barra de ferramentas, também é possível desabilitar apenas um ou mais itens de uma barra. Suponha que, no caso do seu sistema de cadastro, por exemplo, o usuário ainda não tenha inserido dados no formulário. Nesse momento, seria interessante inter essante desabilita de sabilitarr o botão de impressão, uma vez que ainda não existe nada para imprimir. A seguir segui r, veja um exemplo em que ocultamos oculta mos o segundo s egundo botão botã o CADASTRO O DE VEÍCULOS : da barra personalizada CADASTR



























• FINALIZANDO SEU SISTEMA DE CADASTRO Chegou a hora de aplicar os toques finais no seu sistema de cadastro. Temos de resolver r esolver apenas apen as duas d uas coisas: c oisas: – Garantir que, assim que um cadastro seja finalizado, o cursor se mova para a primeira célula da linha seguinte; – Ativar o botão de rotação associado ao número de parcelas spiParcelas ( spiParcelas ). Mãos à obra!

Posicionando o cursor no primeiro registro registro em branco



























Ativando o controle spiParcelas Para exibir o valor das parcelas toda vez que o usuário clicar sobre o botão spiParcelas , siga estes passos: 1

Na janela de código, localize o controle spiParcelas .

2

Logo Log o acima da instrução End En d Sub Sub, Su b, digite este código: Private Sub spiParcelas_Change() txtParcelas.Text = Me.spiParcelas.Value End Sub





























ActiveCell.Va lue = Me.spiParcela ActiveCell.Value Me.spiParcelas.Value s.Value Select Case txtParcelas Case 1 MsgBox(“Somente 1 parcela”) Case 2



























Livro Excel Avancado

Recommend Documents