Partager via

Méthode Event.SetFilterObjects (Visio)

  • Article

Présente un tableau des types d'objets et une valeur True ou False indiquant le mode de filtrage des événements pour chaque objet.

Syntaxe

expression. SetFilterObjects( _Objects()_ )

Expression Variable qui représente un objet Event .

Parameters

Nom Requis/Facultatif Type de données Description
Objects() Obligatoire Long Tableau de types d'objets et une valeur True ou False indiquant le mode de filtrage des événements pour chaque type d'objet.

Valeur renvoyée

Aucune

Remarques

Lorsqu'un objet Event, créé à l'aide de la méthode AddAdvise, est ajouté à la collection EventList d'un objet source, toutes les occurrences de cet événement sont transmises par défaut au récepteur d'événement. La méthode SetFilterObjects permet de ne pas tenir compte des événements sélectionnés, basés sur un type d'objet.

Le paramètre Objects() transmis à SetFilterObjects est un tableau défini de la manière suivante.

Le nombre d'éléments figurant dans le tableau est un multiple de 2 :

  • Le premier élément contient un type d'objet (visTypePage, visTypeGroup, visTypeShape, visTypeForeignObject, visTypeGuide, ou visTypeDoc ).

  • Le deuxième élément contient une valeur True ou False indiquant si vous souhaitez recevoir des événements pour cet objet (True autorise les événements d'un objet, tandis que False les exclut).

Pour la transmission réussie d'un événement via un filtre d'événement d'objet, l'événement doit répondre aux critères ci-dessous :

  • Le type d'objet doit être valide.

  • Si tous les filtres ont la valeur True, l'événement doit au moins correspondre à un filtre.

  • Si tous les filtres comportent la valeur False, l'événement ne doit correspondre à aucun filtre.

  • Si tous les filtres comportent à la fois des valeurs True et False, l'événement doit au moins correspondre à un filtre True et ne doit correspondre à aucun filtre False.

Si aucune plage True n'est définie dans le tableau, les événements sont considérés comme étant True.

Par exemple, si vous souhaitez recevoir uniquement les événements issus d'une forme ou d'un repère, vous pouvez transmettre un tableau similaire à celui-ci :

 
 Dim aFilterObjects(1 To (2 * 2)) As Long 
 aFilterObjects(1) = visTypeShape 
 aFilterObjects(2) = True 
 aFilterObjects(3) = visTypeGuide 
 aFilterObjects(4) = True

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.