Compartilhar via

Usando eventos com o objeto Application (Publisher)

  • Artigo

Para criar um manipulador de eventos para um evento do objeto Application , você precisa concluir as três etapas a seguir:

  1. Declarar uma variável de objeto em um módulo de classe para responder aos eventos

  2. Escrever os procedimentos de evento específicos

  3. Inicializar o objeto declarado de outro módulo

Declarar a variável de objeto

Before you can write procedures for the events of the Application object, you must create a new class module and declare an object of type Application with events. For example, assume that a new class module is created and called EventClassModule. The new class module contains the following code.

Public WithEvents App As Publisher.Application

Escrever os procedimentos de evento

After the new object has been declared with events, it appears in the Object drop-down list box in the class module, and you can write event procedures for the new object. Quando você seleciona o novo objeto na caixa Objeto , os eventos válidos para esse objeto são listados na caixa de lista suspensa Procedimento . Selecione um evento da caixa de listagem suspensa Procedimento; um procedimento vazio é adicionado ao módulo de classe.

Private Sub App_DocumentOpen() 
 
End Sub

Inicializar o objeto declarado

Before the procedure will run, you must connect the declared object in the class module (App in this example) with the Application object. You can do this with the following code from any module.

Dim X As New EventClassModule 
Sub Register_Event_Handler() 
 Set X.App = Publisher.Application 
End Sub

Run the Register_Event_Handler procedure. Depois de executar o procedimento, o objeto App no módulo de classe aponta para o objeto Microsoft Publisher Application e os procedimentos de evento no módulo de classe serão executados quando os eventos ocorrerem.

Observação

Para obter informações sobre como criar procedimentos de evento para o objeto Document , consulte Usando eventos com o objeto Document.

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.