Метод Selection.Distribute (Visio)

Распространение трех или более выбранных фигур через равные интервалы на странице документа. Порядок выбора не имеет значения.

Синтаксис

выражение. Distribute( _Distribute_ , _GlueToGuide_ )

выражение Переменная, представляющая объект выделения .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Distribute	Обязательный	VisDistributeTypes	Определяет способ распределения фигур. Возможные значения см. в примечаниях.
GlueToGuide	Необязательный	Логический	Если имеет значение "Истина", создаются направляющие и приклеиваются к ним выделенные фигуры. Если значение "Ложь", то нет. Значение по умолчанию — False.

Возвращаемое значение

Отсутствует

Примечания

Следующие возможные значения для Distribution объявлены в VisDistributeTypes в библиотеке типов Visio.

Константа	Значение	Описание
visDistHorzCenter	2	Равномерно распределяет фигуры по горизонтали, располагая их нижние края равномерно.
visDistHorzLeft	1	Распределяет фигуры по горизонтали, чтобы их левые края были равномерно распределены.
visDistHorzRight	3	Распределяет фигуры по горизонтали, чтобы их правые края были равномерно распределены.
visDistHorzSpace	0	Распределяет фигуры по горизонтали, чтобы между фигурами было одинаковое расстояние.
visDistVertBottom	7	Распределяет фигуры по вертикали, чтобы их нижние края были равномерно распределены.
visDistVertMiddle	6	Распределяет фигуры по вертикали, чтобы их центры были равномерно распределены.
visDistVertSpace	4	Распределяет фигуры по вертикали, чтобы между фигурами был одинаковый промежуток времени.
visDistVertTop	5	Распределяет фигуры по вертикали, располагая их верхние края равномерно.

Вызов метода распределения эквивалентен настройке параметров в диалоговом окне "Распределение фигур" (на вкладке " Главная " нажмите кнопку "Положение", наведите указатель мыши на пункт "Пространственные фигуры", а затем выберите пункт "Дополнительные параметры распределения").

Передача значения ИСТИНА для необязательного аргумента GlueToGuide эквивалентна выбору поля "Создание направляющих и приклеивание фигур к ним" проверка диалоговом окне "Распределение фигур".

При передаче True для GlueToGuide Visio создает направляющие, чтобы сохранить распределение фигур. Вы можете выбрать и переместить самые внешние направляющие, чтобы переместить фигуры, не изменяя их распределения.

Пример

В этом макросе Microsoft Visual Basic для приложений (VBA) показано, как распределить три фигуры по вертикали, чтобы их правые края были равномерно распределены и приклеены к направляющим.

Public Sub Distribute_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.Distribute visDistVertRight, True 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.