Метод Selection.SelectAll (Visio)

Выбирает все возможные фигуры в окне или выделенном фрагменте.

Синтаксис

expression. ВыбратьВсе

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

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

Отсутствует

Пример

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

 
Public Sub SelectAll_Example() 
 
 Const MAX_SHAPES = 6 
 Dim vsoShapes(1 To MAX_SHAPES) As Visio.Shape 
 Dim intCounter As Integer 
 
 'Draw six rectangles. 
 For intCounter = 1 To MAX_SHAPES 
 Set vsoShapes(intCounter) = ActivePage.DrawRectangle(intCounter, intCounter + 1, intCounter + 1, intCounter) 
 Next intCounter 
 
 'Deselect all the shapes on the page. 
 ActiveWindow.DeselectAll 
 
 'Select all the shapes on the page. 
 ActiveWindow.SelectAll 
 
End Sub

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

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