Selection.Align メソッド (Visio)

2 つ以上の選択された図形を整列します。

構文

式。Align (AlignHorizontal、 AlignVertical、 GlueToGuide)

式Selection オブジェクトを表す変数。

パラメーター

名前	必須 / オプション	データ型	説明
AlignHorizontal	必須	VisHorizontalAlignTypes	選択された図形を、水平軸に沿って整列します。 指定可能な値については、「備考」を参照してください。
AlignVertical	必須	VisVerticalAlignTypes	選択された図形を、垂直軸に沿って整列します。 指定可能な値については、「備考」を参照してください。
GlueToGuide	省略可能	Boolean	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 の両方にゼロ以外の値を渡す場合、選択された図形が重なり合って表示されます。 最後に作成した図形が z 軸方向の前面に表示されます。

Align メソッドの呼び出しは、[ホーム] タブの [位置] をクリックし、[図形の配置] でオプションを設定するのと同じです。

例

次の Microsoft Visual Basic for Applications (VBA) マクロは、Align メソッドを使用して 3 つの図形を垂直方向に整列する方法を示します。

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 のサポートおよびフィードバックを参照してください。