Software  
 
Conhecimento computador >> Software >> Microsoft Access >> 
Como usar eventos com o objeto Application no Excel
linguagem de programação do Microsoft Excel, Visual Basic for Applications (VBA) , faz uso de objetos virtuais para estender os recursos do Excel . Um desses objetos é o objeto Application , que permite que os programadores VBA para escrever programas que impactam o aplicativo Excel próprio . Eventos desse objeto causam sub-rotinas chamadas " funções de eventos " para executar. Qualquer código de programa que você coloca nessas funções será executado quando o evento (por exemplo, criação nova pasta de trabalho , seleção de planilha ) que a função foi escrito para ocorrer . Uma das vantagens de escrever esse código é a capacidade de filtrar os dados que o usuário entra nele. Instruções
1

ambiente de programação VBA Open Excel , em seguida, selecionando o item " View Code " .
2

duas vezes com o botão direito do mouse guia de qualquer planilha em uma pasta de trabalho aberta " Esta pasta de trabalho " linha do painel "Projeto" para abrir uma nova janela de código .
3

cole o código a seguir na primeira linha em branco da nova janela . Esta sub-rotina , que será executado quando você reabrir a pasta de trabalho atual, cria uma nova instância do objeto Application do Excel. Ao fazer isso, a rotina faz com que as funções de eventos do objeto Application disponível para escrever programas para .

Privada WithEvents objApp Como Aplicação

Private Sub Workbook_Open ()

Set objApp = Aplicação

End Sub
4

Clique na lista suspensa à esquerda perto do topo da janela de código . VBA irá exibir uma lista de objetos que você pode escrever código de função de eventos. Um dos objetos da lista é a variável " objApp " você declarada e definida na etapa anterior . Selecione o objeto.
5

Clique na lista suspensa à direita da janela de código , e selecione a função de evento " NewWorkbook " . VBA criará uma função de evento em branco que você vai escrever o código.
6

Cole ou digite o seguinte código do programa acima do " objApp_NewWorkbook " sub-rotina da instrução "Sub End" .

MsgBox " Você criou um novo livro. "
7

Pressione " Alt + F4 " para fechar o ambiente VBA, e pressione a mesma seqüência de teclas para fechar o Excel . Salve a pasta de trabalho com qualquer nome de arquivo válido, e com uma extensão de arquivo "*. Xlsm ". Salvando e reabrir a pasta de trabalho é executado a função de evento Workbook_Open você escreveu no passo 3. Esta função deve ser executado para habilitar funções de eventos objApp para ser executado.
8

reabrir o livro que você acabou de fechar , em seguida, pressione "Control- N" para criar uma nova pasta de trabalho. O código que você escreveu para a sub-rotina objApp_NewWorkbook na etapa 6 será executado , e exibir a mensagem " Você criou um novo livro. "
9

Pressione " Alt- F11 " para voltar a entrar no VBA meio ambiente, em seguida, cole a seguinte nova função de evento em qualquer espaço em branco na janela de código . Esta função evento, que será executado quando você alterar qualquer célula da pasta de trabalho aberta no momento , substitui o texto "JS" com o texto " John Smith ".

Private Sub objApp_SheetChange (ByVal Sh As Object , ByVal Target As Range)

Dim x

x = Target.Value

Se (x = "JS" ) Então

x = " John Smith "

Target.Value = x

End If End


Sub
10

Retornar para Excel com a tecla " Alt- F11 ", digite o texto "JS" em qualquer célula . Ao pressionar " Enter", a função de evento objApp_SheetChange você escreveu no passo anterior irá executar e alterar "JS" em " John Smith ".

Anterior :

Próximo : No
  Os artigos relacionados
·Como Organizar funções RAND no Excel 2007 
·Como posso alterar o formato de uma palavra em uma cél…
·Como calcular variação entre dois conjuntos de númer…
·Como Fazer a distribuição Weibull em Excel 
·Como integrar informações de um banco de dados Micros…
·Como fazer Dízimos e Ofertas de Registros Com o Excel 
·Como bloquear a largura da coluna no Excel 2007 
·Como ajustar a altura da linha de medição no Microsof…
·Como você pode converter MS Word etiquetas de endereç…
·Como adicionar Preenchimento automático para uma plani…
  Artigos em destaque
·Como gravar um disco Blu- Ray Com ImgBurn 
·Como carregar Toques da Apple 
·Como fazer Drupal funcionar mais rapidamente 
·Como criar Bar Stacked Chart 
·Como fazer Stickman Animação em seu computador 
·Como desbloquear um programa em Spy Doctor 
·Como usar o Excel para Probabilidade Binomial 
·Como editar uma música em um Mix 
·Como usar VoCodeX em Ableton Live 
·Meu Roxio 2010 Cine Jogador Não Funciona 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados