(Visio) 的 Addons.ItemU 屬性
從集合中傳回物件。 唯讀。
語法
運算式。ItemU (NameOrIndex)
表達 代表 Addons 物件的 變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
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 支援與意見反應。