0023-Utilizando eventos do Excel – Parte 1

Primeiramente podemos conceituar um evento como a ocorrência de mudança de status de um objeto.
Ao selecionarmos uma planilha, por exemplo, podemos capturar esta ocorrência por meio do evento Worksheet_Activate.
Desta forma podemos controlar de que maneira uma planilha ou outro objeto se comporta quando ocorrer uma série de diferentes alterações.
Vamos começar explorando alguns eventos de planilha.
Para que possam ser inseridos, é necessário acessar a página de código associado à planilha. A forma mais comum é clicar com o botão direito na aba de planilha e selecionar a opção Exibir Código.
Eis dois exemplos de códigos utilizando eventos de planilha

1. Worsksheet_Activate.
Ao selecionar a planilha, o usuário é informado sobre a forma de inserir os dados. Isto pode ser utilizado como um help simplificado.

Private Sub Worksheet_Activate()
Dim msg As String
msg = "Planilha para cálculo de juros" & Chr(13)
msg = msg & "Informe em A1 o valor do principal." & Chr(13)
msg = msg & "Informe em B1 o tempo de aplicação, expresso em meses" & Chr(13)
msg = msg & "Informe em C1 a taxa de juros, expressa em % a.m."
MsgBox msg
End Sub

2. Worksheet_Change
Ao modificar o valor de uma célula, o interior da mesma é colorido com base no valor digitado.

Private Sub Worksheet_Change(ByVal Target As Range)
Select Case Target
Case Is < 0
Target.Interior.Color = vbRed
Case 0 To 100
Target.Interior.Color = vbGreen
Case 100 To 1000
Target.Interior.Color = vbBlue
Case Else
Target.Interior.Color = xlNone
End Select
End Sub
Anúncios

In Excel We Trust

Marcado com: , ,
Publicado em Nível: Avançado

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s

Visitas dos usuários
  • 2,069,536

Clique para assinar este blog e receber notificações de novos artigos por email.

Junte-se a 1.534 outros seguidores

Aumente sua interação

Siga-nos do twitter (@usuariosdoexcel).

Acesse o nosso fórum e compartilhe as suas dúvidas.

Curta nossa página no Facebook.

Junte-se ao grupo do LinkedIn.

Visite-nos utilizando o seu smartphone ou tablet.

Recomende este Blog
Visualizar notícias
Site monitorado:
Real Time Web Analytics

Clicky

%d blogueiros gostam disto: