Partager via

Utiliser des événements avec l’objet Application

  • Article

Pour créer un gestionnaire d’événements pour un événement de l’objet Application, vous devez effectuer les trois étapes suivantes :

  1. Déclarer une variable d’objet dans un module de classe pour répondre aux événements.

  2. Écrire les procédures événement spécifiques.

  3. Initialiser l’objet déclaré à partir d’un autre module.

Déclarer la variable d’objet

Avant de pouvoir écrire des procédures pour les événements de l'objet Application, vous devez créer un module de classe et déclarer un objet du type Application avec des événements. Prenons par exemple un nouveau module de classe nommé « EventClassModule ». Il contient le code suivant.

Public WithEvents App As Application

Écrire les procédures des événements

Une fois le nouvel objet déclaré avec des événements, il apparaît dans la liste Des objets du module de classe et vous pouvez écrire des procédures événementielles pour le nouvel objet. (Lorsque vous sélectionnez le nouvel objet dans la liste Objet , les événements valides pour cet objet sont répertoriés dans la liste Procédure .) Sélectionnez un événement dans la liste Procédure ; une procédure vide est ajoutée au module de classe.

Private Sub App_NewPresentation()

End Sub

Initialisation de l’objet déclaré

Avant de pouvoir exécuter la procédure, vous devez relier l'objet déclaré dans le module de classe (App dans cet exemple) à l'objet Application. Pour ce faire, utilisez le code suivant à partir d'un module quelconque.

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

Exécutez la procédure InitializeApp. Une fois cette procédure exécutée, l’objet App du module de classe pointe vers l’objet Microsoft Office PowerPoint Application et les procédures événement de ce module de classe s’exécutent lorsque les événements se produisent.

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.