次の方法で共有

Addons.ItemU プロパティ (Visio)

  • [アーティクル]

コレクションのオブジェクトを返します。 読み取り専用です。

構文

式。ItemU (NameOrIndex)

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

パラメーター

名前 必須 / オプション データ型 説明
NameOrIndex 必須 バリアント型 取得されるオブジェクトの汎用名、一意の ID、またはインデックスを含みます。

戻り値

アドオン

注釈

オブジェクトの名前を Variant の文字列式として渡すことで、アドオン、ハイパーリンク、レイヤー、マスター、MasterS、MasterShortcuts、Pages、Shapes、または Styles コレクション内のオブジェクトを取得できます。

Shape オブジェクトを名前で取得する場合、ItemU プロパティは Shapes コレクションに含まれている図形だけでなく、コレクションに含まれているページやマスター シェイプ内の図形もすべて検索します。 したがって、ItemU プロパティから返される Shape オブジェクトは、Shapes コレクション内にはない図形である可能性があります。

また、ItemU プロパティには、Master オブジェクトや Shape オブジェクトの一意の ID 文字列を渡すこともできます。 例:

objRet = vsoShapes.ItemU("{2287DC42-B167-11CE-88E9-0020AFDDD917}")

このような文字列を Shapes コレクションの ItemU プロパティに渡すと、コレクション内のすべての図形が検索されます。 含んでいる図形にあるグループ図形内の図形は検索されません。

コレクション内のすべての図形、およびグループ内の図形とコレクション内に含まれる図形を検索するには、一意の ID 文字列の前にアスタリスク (*) を付けます。 例:

objRet = vsoShapes.ItemU("*{2287DC42-B167-11CE-88E9-0020AFDDD917}")

例

この Microsoft Visual Basic マクロは、Pages コレクションの ItemU プロパティを使用して Shapes コレクションを取得する方法を示しています。 次に、Shapes コレクションの ItemU プロパティを使用して、イミディエイト ウィンドウのページ 1 のすべての図形のユニバーサル名を印刷します。

このマクロを実行するには、作業中の文書にページ 1 の図形があることを確認します。

 
Public Sub ItemU_Example() 
  
    Dim intCounter As Integer 
    Dim intShapeCount As Integer 
    Dim vsoShapes As Visio.Shapes  
 
    Set vsoShapes = ActiveDocument.Pages.ItemU(1).Shapes  
 
    Debug.Print "Shapes in Document: "; ActiveDocument.Name  
    Debug.Print "          on  Page: "; ActiveDocument.Pages.ItemU(1).Name  
 
    intShapeCount = vsoShapes.Count  
 
    If intShapeCount > 0 Then 
 
        For intCounter = 1 To intShapeCount  
            Debug.Print " "; vsoShapes.ItemU(intCounter).Name  
        Next intCounter 
  
    Else 
 
        Debug.Print " No Shapes On Page" 
  
    End If   
 
End Sub

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

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