Selection.SelectAll method (Visio)
Selects all possible shapes in a window or selection.
Syntax
expression.SelectAll
expression A variable that represents a Selection object.
Return value
Nothing
Example
This Microsoft Visual Basic for Applications (VBA) macro shows how to select all the shapes on the page.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.