Application.ActivePage プロパティ (Visio)

アクティブな Page オブジェクトを返します。 読み取り専用です。

構文

式。ActivePage

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

戻り値

Page

注釈

ActivePage プロパティは、作業中のウィンドウに図面ページが表示されている場合にのみ Page オブジェクトを返します。それ以外の場合は、何も返されません。 ページがアクティブであることを確認するには、 Is 演算子を使用して、 ActivePage プロパティと Nothing を比較します。

Microsoft Visio グローバル オブジェクトから修飾なしでアクティブなウィンドウを取得できます。これは、Visio ドキュメントの VBA プロジェクトの一部である VBA コードで自動的に使用できます。 たとえば、次のコードを使用できます。

Set vsoPage = ActivePage

Visual Studioソリューションには、Microsoft.Office.Interop.Visio の参照が含まれている場合、このプロパティは、次の種類にマップします。

  • Microsoft.Office.Interop.Visio.IVApplication.ActivePage

例

この Microsoft Visual Basic for Applications (VBA) マクロは、Visio ドキュメントの VBA プロジェクトの一部である VBA コードで自動的に使用可能になる Visio グローバル オブジェクトから、修飾なしでアクティブなページを取得する方法を示しています。

 
Public Sub ActivePage_Example() 
  
    Dim vsoPage As Page  
 
    'Find out if a page exists, and if it does, get the page. 
    If Not(ActivePage Is Nothing)  Then 
        Set vsoPage = ActivePage 
        Debug.Print vsoPage.Name 
    Else 
        Debug.Print "No active page." 
    End If   
 
End Sub

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

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

  • Last updated on