共用方式為


(Visio) 的 Addons.ItemU 屬性

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

語法

運算式ItemU (NameOrIndex)

表達 代表 Addons 物件的 變數。

參數

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

傳回值

外掛程式

註解

您可以在Variant中傳遞物件的名稱做為字串運算式,以擷取AddonsHyperlinksLayersMastersMasterShortcutsPagesShapesStyles 集合中的物件。

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

您也可以將 MasterShape 物件的唯一識別碼字串傳給 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 支援與意見反應