Clase Selection (PowerPoint VBA)

La clase Selection representa la selección en la ventana del documento especificado. El objeto Selection se elimina siempre que se cambien las diapositivas en una vista Diapositiva activa; la propiedad Type devolverá ppSelectionNone.

Los principales procedimientos de la clase Selection son Copy y Delete

Set

Para usar una variable de clase Selection, primero debe ser instanciado, por ejemplo

Dim slc as Selection
Set slc = ActiveWindow.Selection

Las variables de tipo Selection se pueden establecer utilizando el procedimiento DocumentWindow.Selection

Métodos

Los principales métodos de la clase Selection son

Copy - Copia el objeto especificado en el Portapapeles.

ActiveWindow.Selection.Copy

Delete - Elimina el objeto Selection especificado.

ActiveWindow.Selection.Delete

Propiedades

ChildShapeRange Devuelve un objeto ShapeRange que representa las formas secundarias de una selección.

Dim sreChildShapeRange As ShapeRange
Set sreChildShapeRange = ActiveWindow.Selection.ChildShapeRange

HasChildShapeRange True si la selección contiene formas secundarias. Solo lectura.

Dim booHasChildShapeRange As Boolean
booHasChildShapeRange = ActiveWindow.Selection.HasChildShapeRange

Parent Devuelve el objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.Selection.Parent

ShapeRange Devuelve un objeto ShapeRange que representa todos los objetos de diapositivas que se han seleccionado en la diapositiva especificada. Solo lectura.

Dim sreShapeRange As ShapeRange
Set sreShapeRange = ActiveWindow.Selection.ShapeRange

SlideRange Devuelve un objeto SlideRange que representa un intervalo de diapositivas seleccionadas. Solo lectura.

Dim sreSlideRange As SlideRange
Set sreSlideRange = ActiveWindow.Selection.SlideRange

TextRange Devuelve un objeto TextRange que representa el texto seleccionado. Solo lectura.

Dim treTextRange As TextRange
Set treTextRange = ActiveWindow.Selection.TextRange

TextRange2 Devuelve el objeto TextRange2 del objeto de selección actual. Solo lectura.

Dim tr2TextRange2 As Office.TextRange2
Set tr2TextRange2 = ActiveWindow.Selection.TextRange2

Type Representa el tipo de objetos de una selección. Solo lectura.

Dim pstType As PpSelectionType
pstType = ActiveWindow.Selection.Type