Visio) (Hyperlinks.ItemU 屬性

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

語法

運算式。ItemU (NameOrIndex)

expression 代表 Hyperlinks 物件的變數。

參數

傳回值

超連結

註解

您可以將物件名稱作為 Variant 中的字串運算式傳遞，以擷取 Addons、Hyperlinks、Layers、MasterShortcuts、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 支援與意見反應。