會對齊兩個以上選取的圖形。
語法
運算式。對齊 (AlignHorizontal、 AlignVertical、 GlueToGuide)
運算式 代表 Selection 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| AlignHorizontal | 必要 | VisHorizontalAlignTypes | 會對齊選取的圖形與橫軸。 如需可能的值,請參閱<備註>。 |
| AlignVertical | 必要 | VisVerticalAlignTypes | 會對齊選取的圖形與縱軸。 如需可能的值,請參閱<備註>。 |
| GlueToGuide | 選用 | 布林值 | 如果為 True,則會建立輔助線並將選取的圖形黏附至輔助線;如果 為 False,則不會。 預設值為 False 。 |
傳回值
無
註解
下列 AlignHorizontal 的可能值會在 Visio 類型程式庫的 VisHorizontalSelectionTypes 中宣告。
| 常數 | 值 | 描述 |
|---|---|---|
| visHorzAlignCenter | 2 | 會對齊至主要選取圖形的中心 |
| visHorzAlignLeft | 1 | 會對齊至主要選取圖形的左側 |
| visHorzAlignNone | 0 | 不需水平對齊 |
| visHorzAlignRight | 3 | 會對齊至主要選取圖形的右側 |
下列 AlignVertical 的可能值會在 Visio 類型程式庫的 VisVerticalSelectionTypes 中宣告。
| 常數 | 值 | 描述 |
|---|---|---|
| visVertAlignBottom | 3 | 會對齊至主要選取圖形的底部 |
| visVertAlignMiddle | 2 | 會對齊至主要選取圖形的中間 |
| visVertAlignNone | 0 | 不需垂直對齊 |
| visVertAlignTop | 1 | 會對齊至主要選取圖形的頂部 |
如果您將非零的值傳遞給 AlignHorizontal 和 AlignVertical,則選取的圖形會重疊。 最近建立的圖形會顯示在疊置順序的前面。
呼叫 Align 方法等同於按一下 [常用] 索引標籤上的 [位置],然後在 [對齊圖形] 下設定選項。
範例
這個 Microsoft Visual Basic for Applications (VBA) 巨集會顯示如何使用 Align 方法,將三個圖形垂直對齊。
Public Sub Align_Example()
Dim vsoShape1 As Visio.Shape
Dim vsoShape2 As Visio.Shape
Dim vsoShape3 As Visio.Shape
Set vsoShape1 = Application.ActiveWindow.Page.DrawRectangle(1, 9, 3, 7)
Set vsoShape2 = Application.ActiveWindow.Page.DrawRectangle(3, 6, 5, 5)
Set vsoShape3 = Application.ActiveWindow.Page.DrawRectangle(6, 4, 8, 2)
ActiveWindow.DeselectAll
ActiveWindow.Select vsoShape1, visSelect
ActiveWindow.Select vsoShape2, visSelect
ActiveWindow.Select vsoShape3, visSelect
Application.ActiveWindow.Selection.Align visHorzAlignRight, visVertAlignNone, False
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。