Compartir a través de


Método Page.CreateSelection (Visio)

Crea varios tipos de objetos Selection.

Sintaxis

expresión. CreateSelection( _SelType_ , _IterationMode_ , _[Data]_ )

Expresión Variable que representa un objeto Page .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
SelType Obligatorio VisSelectionTypes Tipo de selección. Vea la sección Comentarios para obtener los posibles valores.
IterationMode Opcional VisSelectMode Modo de selección utilizado. Vea la sección Comentarios para obtener los posibles valores.
Datos Opcional Variant Tipo de objeto que corresponde al argumento SelType. Vea la sección Comentarios para los valores posibles.

Valor devuelto

Selección

Observaciones

El método CreateSelection posibilita la creación de selecciones complejas mediante programación. De este modo, en lugar de tener que seleccionar todas las formas de una página, por ejemplo, podrá seleccionar sólo las que se encuentran situadas en una capa determinada, o las que están basadas en un patrón determinado.

Llamar al método CreateSelection con SelType igual a visSelTypeByType o visSelTypeByLayer equivale a seleccionar opciones en el cuadro de diálogo Seleccionar porType (haga clic en Seleccionar en el grupo Edición de la pestaña Inicio y, a continuación, haga clic en Seleccionar por tipo).

El argumento SelType debe ser uno de los siguientes valores, que se declaran en VisSelectionTypes en la biblioteca de tipos de Visio.

Constante Valor Descripción
visSelTypeAll 1 Selección que inicialmente contiene todas las formas.
visSelTypeByDataGraphic 6 Selección que inicialmente contiene todas las formas a las que se ha aplicado un tipo de gráfico de datos determinado.
visSelTypeByLayer 3 Selección que inicialmente contiene todas las formas de una capa determinada.
visSelTypeByMaster 5 Selección que inicialmente contiene todas las formas de un patrón determinado para las que se han creado instancias.
visSelTypeByRole 7 Selección que inicialmente contiene todas las formas de un rol determinado.
visSelTypeByType 4 Selección que inicialmente contiene todas las formas de un determinado tipo.
visSelTypeEmpty 0 Selección que inicialmente no contiene formas.
visSelTypeSingle 2 Selección que inicialmente contiene una forma.

El argumento opcional IterationMode debe ser uno de los siguientes valores, que se declaran en VisSelectMode en la biblioteca de tipos de Visio. El valor predeterminado es visSelModeSkipSuper.

Constante Valor Descripción
visSelModeOnlySub &H0800 La selección sólo informa acerca de las formas subseleccionadas.
visSelModeOnlySuper &H0200 La selección sólo informa acerca de las formas superseleccionadas.
visSelModeSkipSub &H0400 La selección no informa acerca de las formas subseleccionadas.
visSelModeSkipSuper &H0100 La selección no informa acerca de las formas superseleccionadas.

El argumento Data opcional debe ser un objeto cuyo tipo sea el especificado por SelType. Por ejemplo, si desea seleccionar todos los patrones de un tipo determinado, Data deberá ser del tipo Master. Y si desea seleccionar todas las formas de una capa determinada, Data deberá ser del tipo Layer.

Cuando SelType es visSelTypeByRole, Data debe ser miembro de la enumeración VisRoleSelectionTypes .

Cuando el argumento SelType sea visSelTypeByType, los valores posibles de Data deberían ser cualquiera de los valores siguientes, que se declaran en VisTypeSelectionTypes en la biblioteca de tipos de Visio.

Constante Valor Descripción
visTypeSelBitmap 16 Forma que es un mapa de bits.
visTypeSelGroup 1 Forma que contiene otras formas.
visTypeSelGuide 4 Forma que es una guía.
visTypeSelInk 32 Forma que es de tinta.
visTypeSelMetafile 8 Forma que es un metarchivo.
visTypeSelOLE 64 Forma que está vinculada o incrustada, o que es un control.
visTypeSelShape 2 Forma nativa de Visio.

Ejemplo

Esta macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo utilizar el método CreateSelection para seleccionar todas las formas de una capa determinada. Antes de ejecutar esta macro, cree dos capas en el dibujo, una denominada "a" y otra denominada "b", y agregue formas a ambas capas.

Public Sub CreateSelection_Layer_Example() 
 
 Dim vsoLayer As Visio.Layer 
 Dim vsoSelection As Visio.Selection 
 
 Set vsoLayer = ActivePage.Layers.ItemU("a") 
 Set vsoSelection = ActivePage.CreateSelection(visSelTypeByLayer, visSelModeSkipSuper, vsoLayer) 
 
 Application.ActiveWindow.Selection = vsoSelection 
 
End Sub

Esta macro de VBA muestra cómo usar el método CreateSelection para seleccionar una forma determinada en la página de dibujo. Antes de ejecutarla, abra la galería de símbolos Formas básicas.

Public Sub CreateSelection_Page_Example() 
 
 Dim vsoSelection As Visio.Selection 
 Dim vsoShape As Visio.Shape 
 
 Application.ActiveWindow.Page.Drop Application.Documents("BASIC_U.VSS").Masters.ItemU("Rectangle"), 2, 9 
 Application.ActiveWindow.Page.Drop Application.Documents("BASIC_U.VSS").Masters.ItemU("Rectangle"), 5, 9 
 Application.ActiveWindow.Page.Drop Application.Documents("BASIC_U.VSS").Masters.ItemU("Rectangle"), 2, 7 
 
 Set vsoShape = ActivePage.Shapes(2) 
 Set vsoSelection = ActivePage.CreateSelection(visSelTypeSingle, visSelModeSkipSuper, vsoShape) 
 
 Application.ActiveWindow.Selection = vsoSelection 
 
 Debug.Print vsoShape.Name 
 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.