24.08.2020 Views

Programando o Excel ® Vba Para Leigos - 2ª Ed 2013 NoDRM (1)

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Capítulo 11: Procedimentos e Eventos Automáticos

167

Neste caso, Sh é o argumento passado ao procedimento e é uma

variável que representa a planilha na pasta de trabalho ativada. Exemplos

neste capítulo esclarecem esta questão.

Exemplos Introdutórios

Nesta seção, apresento alguns exemplos para que você possa ter uma

ideia sobre esse negócio de lidar com eventos.

O evento Open para uma pasta de trabalho

Um dos eventos mais usados é o evento Workbook Open. Digamos que

você tem uma pasta de trabalho que usa diariamente. O procedimento

Workbook_Open neste exemplo é executado cada vez que a pasta de

trabalho é aberta. O procedimento verifica o dia da semana; se for

Sexta-Feira, o código exibe uma mensagem lembrando-o.

Para criar o procedimento que é executado sempre que ocorrer o

evento Workbook Open, siga estes passos:

1. Abra uma pasta de trabalho.

Qualquer pasta de trabalho serve.

2. Pressione Alt+F11 para ativar o VBE.

3. Localize a pasta de trabalho na janela Projeto.

4. Clique duas vezes o nome do projeto para exibir os seus itens, se

necessário.

5. Clique duas vezes o item EstaPasta_de_Trabalho.

O VBE exibe uma janela de Código vazia para o objeto

EstaPasta_de_Trabalho.

6. Na janela Código, selecione Workbook a partir da lista

drop-down de Objeto (à esquerda).

O VBE insere declarações no início e no final para um procedimento

Workbook_Open.

7. Entre com as seguintes declarações, para que o procedimento

de evento completo se pareça com isto:

Private Sub Workbook_Open()

Dim Msg As String

If WeekDay(Now) = 6 Then

Msg = “Today is Friday. Make sure that you “

Msg = Msg & “do your weekly backup!”

MsgBox Msg

End If

End Sub

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!