Style.PersistsEvents property (Visio)
Indicates whether an object is capable of containing persistent events in its EventList collection. Read-only.
Syntax
expression.PersistsEvents
expression A variable that represents a Style object.
Return value
Integer
Remarks
Every object that has an EventList property also has a PersistsEvents property. To be persistable, an event's action code must be visActCodeRunAddon, but it must also be in the EventList collection of an object whose PersistsEvents property is True. The only objects that currently persist events are Document, Master, and Page objects.
Whether a persistable event actually does persist depends on the value of its Persistent property.
Example
This Microsoft Visual Basic for Applications (VBA) macro shows how to use the PersistsEvents property to determine if an object is capable of containing persistent events. Executing the macro prints 1 (True), 1 (True), and 0 (False) in the Immediate window for the Document, Page, and Window objects, respectively.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.