Selection.Align 方法 (Visio)

會對齊兩個以上選取的圖形。

語法

運算式。align (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 支援與意見反應。