從集合中傳回物件。 唯讀。
語法
表情。ItemU (NameOrIndex)
expression 代表 Hyperlinks 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| 名稱或索引 | 必要 | Variant | 包含要擷取的物件之通用名稱、唯一識別碼或索引。 |
傳回值
超連結
註解
你可以透過在 Variant 中以字串表達式傳遞物件名稱,取得 Addons、超連結、圖層、主圖、主、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 支援與意見反應。