從集合中傳回物件。 唯讀。
語法
運算式。ItemU (NameOrIndex)
運算式 代表 Addons 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| NameOrIndex | 必要 | Variant | 包含要擷取的物件之通用名稱、唯一識別碼或索引。 |
傳回值
註解
您可以將物件名稱作為 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 支援與意見反應。