Table of contents
TOC
Recolher sumário
Expandir sumário

Usar eventos com o objeto ApplicationUse Events with the Application Object

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Para criar um manipulador de eventos para um evento do objeto Application , você precisa concluir estas três etapas:To create an event handler for an event of the Application object, you need to complete the following three steps:

  1. Declarar uma variável de objeto em um módulo de classe para responder aos eventosDeclare an object variable in a class module to respond to the events.

  2. Escrever os procedimentos de evento específicosWrite the specific event procedures.

  3. Inicializar o objeto declarado de outro móduloInitialize the declared object from another module.

Declarar a variável de objetoDeclare the Object Variable

Antes de você pode escrever procedimentos para os eventos do objeto Application , você deve criar um novo módulo de classe e declarar um objeto do tipo de aplicativo com eventos. Por exemplo, suponha que um novo módulo de classe é criado e chamado EventClassModule. O novo módulo de classe contém o código a seguir.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 Application

Escrever os procedimentos de eventoWrite the Event Procedures

Depois que o novo objeto é declarado com eventos, ele aparece na lista de objetos no módulo de classe e você pode escrever procedimentos de evento para o novo objeto. (Quando você seleciona o novo objeto na lista de objetos , os eventos válidos para esse objeto são listados na lista procedimento ). Selecione um evento na lista procedimento ; um procedimento vazio é adicionado ao módulo de classe.After the new object is declared with events, it appears in the Object list in the class module, and you can write event procedures for the new object. (When you select the new object in the Object list, the valid events for that object are listed in the Procedure list.) Select an event from the Procedure list; an empty procedure is added to the class module.

Private Sub App_NewPresentation()

End Sub

Inicializar o objeto declaradoInitializing the Declared Object

Antes da execução do procedimento, você deve conectar o objeto declarado no módulo de classe (App neste exemplo) com o objeto Application . Você pode fazer isso com o código a seguir a partir de qualquer módulo.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 InitializeApp()
    Set X.App = Application
End Sub

Execute o procedimento InitializeApp. Depois que o procedimento é executado, o objeto App no módulo de classe apontará para o objeto do Microsoft Office PowerPoint aplicativo e os procedimentos de evento no módulo de classe serão executado quando os eventos ocorrem.Run the InitializeApp procedure. After the procedure is run, the App object in the class module points to the Microsoft Office PowerPoint Application object, and the event procedures in the class module will run when the events occur.

© 2018 Microsoft