Propriété Selection.PersistsEvents (Visio)

Indique si un objet peut contenir des événements permanents dans sa collection EventList. En lecture seule.

Syntaxe

expression. PersistsEvents

Expression Variable qui représente un objet Selection .

Valeur renvoyée

Entier

Remarques

Chaque objet ayant une propriété EventList a également une propriété PersistsEvents. Pour pouvoir être permanent, le code d'action de l'événement doit avoir la valeur visActCodeRunAddon, mais ce code doit également figurer dans la propriété EventList d'un objet dont la propriété PersistsEvents a la valeur True. Les seuls objets qui peuvent être permanents sont : Document, Master et Page.

C'est la valeur de la propriété Persistentde l'événement qui détermine si celui-ci est réellement permanent.

Exemple

Cette macro Microsoft Visual Basic pour Applications (VBA) indique comment utiliser la propriété PersistsEvents afin de déterminer si un objet est en mesure de contenir des événements permanents. L’exécution de la macro imprime 1 (True), 1 (True) et 0 (False) dans la fenêtre Exécution pour les objets Document, Page et Window , respectivement.

 
Public Sub PersistsEvents_Example() 
 
 Dim vsoDocument As Visio.Document 
 
 Set vsoDocument = Documents.Add("") 
 Debug.Print vsoDocument.PersistsEvents 
 Debug.Print ActivePage.PersistsEvents 
 Debug.Print ActiveWindow.PersistsEvents 
 
End Sub

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.