Visio) (Pages.ItemU 屬性

從集合中傳回物件。 唯讀。

語法

運算式。ItemU (NameOrIndex)

表達 代表 Pages 物件的變數。

參數

名稱	必要/選用	資料類型	描述
NameOrIndex	必要	Variant	包含要擷取的物件之通用名稱、唯一識別碼或索引。

傳回值

頁面

註解

您可以在Variant中傳遞物件的名稱做為字串運算式，以擷取Addons、Hyperlinks、Layers、Masters、MasterShortcuts、Pages、Shapes或Styles 集合中的物件。

如果您依名稱擷取 Shape 物件，除了集合的包含圖形之外， ItemU 屬性還會搜尋 Shapes 集合包含頁面或包含主圖形中的所有圖形。 因此，ItemU屬性傳回的Shape物件可以是不在Shapes集合中的圖形。

您也可以將 Master 或 Shape 物件的唯一識別碼字串傳給 ItemU 屬性。 例如：

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

如果將這類字串傳遞至Shapes集合的ItemU屬性，則會搜尋集合中包含的所有圖形。 不會搜尋包含圖形中群組圖形內的圖形。

若要搜尋此集合中的所有圖形，以及在群組內的圖形與此集合的包含圖形中搜尋，請在唯一識別碼字串中加上星號 (*) 當做首碼。 例如：

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 支援與意見反應。