Visio) (Page.CreateSelection 方法
建立各種類型的 Selection 物件。
語法
expression。 CreateSelection( _SelType_ , _IterationMode_ , _[Data]_ )
表達 代表 Page 對象的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| SelType | 必要項目 | VisSelectionTypes | 選取範圍的類型。 如需可能的值，請參閱＜備註＞。 |
| IterationMode | 選用 | VisSelectMode | 所使用的選取模式。 如需可能的值，請參閱＜備註＞。 |
| 資料 | 選用 | Variant | 對應到 SelType 引數的物件類型。 請參閱 「 備註 」 可能的值。 |
傳回值
選取範圍
註解
CreateSelection 方法可讓您以程序設計方式建立複雜的選取專案。 因此，您不必選取頁面上的所有圖形，例如，您可以只選取指定圖層上的圖形，或只選取以特定主圖形為基礎的圖形。
呼叫 CreateSelection 方法時，SelType 等於 visSelTypeByType 或 visSelTypeByLayer，相當於選取 [選取 byType] 對話框中的選項 (按兩下 [首頁] 索引標籤上 [編輯] 群組中的 [選取]，然後按兩下 [依類型選取) ] 。
SelType 自變數應該是下列其中一個值，這些值是在 Visio 類型連結庫的 VisSelectionTypes 中宣告。
| 常數 | 值 | 描述 |
|---|---|---|
| visSelTypeAll | 1 | 最初包含所有圖形的選取範圍。 |
| visSelTypeByDataGraphic | 6 | 最初包含所有已套用指定類型之資料圖形的選取範圍。 |
| visSelTypeByLayer | 3 | 最初包含指定之圖層所有圖形的選取範圍。 |
| visSelTypeByMaster | 5 | 最初包含指定之主圖形所有產生例項圖形的選取範圍。 |
| visSelTypeByRole | 7 | 最初包含指定之角色的所有圖形的選取範圍。 |
| visSelTypeByType | 4 | 最初包含指定之類型的所有圖形的選取範圍。 |
| visSelTypeEmpty | 0 | 最初不包含任何圖形的選取範圍。 |
| visSelTypeSingle | 2 | 最初包含一個圖形的選取範圍。 |
選擇性的 IterationMode 自變數應該是下列其中一個值，這些值是在 Visio 類型連結庫的 VisSelectMode 中宣告。 默認值為 visSelModeSkipSuper。
| 常數 | 值 | 描述 |
|---|---|---|
| visSelModeOnlySub | &H0800 | 選取範圍只會報告後續選取的圖形。 |
| visSelModeOnlySuper | &H0200 | 選取範圍只會報告超選取的圖形。 |
| visSelModeSkipSub | &H0400 | 選取範圍不會報告子選取的圖形。 |
| visSelModeSkipSuper | &H0100 | 選取範圍不會報告超選取的圖形。 |
選擇性的 Data 自變數應該是對應至 SelType 所指定之物件類型的物件。 例如，如果您想要選取特定類型的所有主圖形， 則數據 應為 Master 類型。 而且，如果您想要選取特定圖層上的所有圖形， 數據 應該屬於 Layer 類型。
當 SelType 為 visSelTypeByRole 時， Data 應該是 VisRoleSelectionTypes 列舉的成員。
當 SelType 引數為 visSelTypeByType 時，可能的 Data 值應該是下列其中一個值 (下列的值是在 Visio 型別程式庫中的 VisTypeSelectionTypes 內宣告)。
| 常數 | 值 | 描述 |
|---|---|---|
| visTypeSelBitmap | 16 | 屬於點陣圖的圖形。 |
| visTypeSelGroup | 1 | 包含其他圖形的圖形。 |
| visTypeSelGuide | 4 | 輔助線圖形。 |
| visTypeSelInk | 32 | 屬於筆跡的圖形。 |
| visTypeSelMetafile | 8 | 屬於中繼檔的圖形。 |
| visTypeSelOLE | 64 | 連結或內嵌的圖形，或是屬於控制項的圖形。 |
| visTypeSelShape | 2 | 原生 Visio 圖形。 |
範例
這個 Microsoft Visual Basic for Applications (VBA) 巨集會示範如何使用 CreateSelection 方法來選取特定圖層上的所有圖形。 執行此宏之前，請先在繪圖中建立兩個圖層，一個名為 “a” ，另一個名為 “b”，然後將圖形新增至這兩個圖層。
Public Sub CreateSelection_Layer_Example()
Dim vsoLayer As Visio.Layer
Dim vsoSelection As Visio.Selection
Set vsoLayer = ActivePage.Layers.ItemU("a")
Set vsoSelection = ActivePage.CreateSelection(visSelTypeByLayer, visSelModeSkipSuper, vsoLayer)
Application.ActiveWindow.Selection = vsoSelection
End Sub
此 VBA 宏會示範如何使用 CreateSelection 方法來選取繪圖頁面上的特定圖形。 執行此宏之前，請開啟 [基本圖形] 樣板。
Public Sub CreateSelection_Page_Example()
Dim vsoSelection As Visio.Selection
Dim vsoShape As Visio.Shape
Application.ActiveWindow.Page.Drop Application.Documents("BASIC_U.VSS").Masters.ItemU("Rectangle"), 2, 9
Application.ActiveWindow.Page.Drop Application.Documents("BASIC_U.VSS").Masters.ItemU("Rectangle"), 5, 9
Application.ActiveWindow.Page.Drop Application.Documents("BASIC_U.VSS").Masters.ItemU("Rectangle"), 2, 7
Set vsoShape = ActivePage.Shapes(2)
Set vsoSelection = ActivePage.CreateSelection(visSelTypeSingle, visSelModeSkipSuper, vsoShape)
Application.ActiveWindow.Selection = vsoSelection
Debug.Print vsoShape.Name
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。