次の方法で共有

InvisibleApp.PersistsEvents プロパティ (Visio)

  • [アーティクル]

オブジェクトが EventList コレクションに永続的なイベントを格納できるかどうかを示します。 読み取り専用です。

構文

式。PersistsEvents

式InvisibleApp オブジェクトを表す変数。

戻り値

整数

注釈

EventList プロパティを持つすべてのオブジェクトにも PersistsEvents プロパティがあります。 永続化可能にするには、イベントのアクション コードは visActCodeRunAddon である必要がありますが、PersistsEvents プロパティが True のオブジェクトの EventList コレクションにも含まれている必要があります。 現在イベントを保持しているオブジェクトは、 Document、 Master、 Page オブジェクトのみです。

永続可能なイベントが実際に永続するかどうかは、その Persistent プロパティの値によって決まります。

例

この Microsoft Visual Basic for Applications (VBA) マクロは、PersistsEvents プロパティを使用して、オブジェクトが永続的なイベントを格納できるかどうかを判断する方法を示しています。 マクロを実行すると、Document オブジェクト、Page オブジェクト、および Window オブジェクトのイミディエイト ウィンドウに、それぞれ 1 (True)、1 (True)、0 (False) が出力されます。

 
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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。