Objeto ShapeRange (PowerPoint)
Representa un intervalo de formas, es decir, un conjunto de formas de un documento. Un intervalo de formas puede estar compuesto por una única forma o por todas las formas del documento.
Comentarios
Puede incluir las formas que desee(elegidas entre todas las formas del documento o todas las formas de la selección) para construir un intervalo de formas. Por ejemplo, podría construir una colección ShapeRange que contenga las tres primeras formas en un documento, todas las formas seleccionadas o todas las formas libres de un documento.
Para obtener información general sobre cómo trabajar con una sola forma o con más de una forma a la vez, consulte Trabajo con formas (objetos de dibujo).
En los siguientes ejemplos se describe cómo:
Devuelve un conjunto de formas que especifique por nombre o número de índice.
Devolver algunas o todas las formas seleccionadas en un documento.
Ejemplo:
Use Shapes.Range (index), donde index es el nombre o número de índice de la forma o una matriz que contiene nombres o números de índice de formas, para devolver una colección ShapeRange que representa un conjunto de formas en un documento. Use la función Array para construir una matriz de nombres o números de índice. En el siguiente ejemplo se configura el patrón de relleno para las formas una y tres en myDocument.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.Range(Array(1, 3)).Fill _
.Patterned msoPatternHorizontalBrick
En el siguiente ejemplo se configura el patrón de relleno para las formas denominadas Oval 4 y Rectangle 5 en myDocument.
Set myDocument = ActivePresentation.Slides(1)
Set myRange = myDocument.Shapes _
.Range(Array("Oval 4", "Rectangle 5"))
myRange.Fill.Patterned msoPatternHorizontalBrick
Aunque puede usar el método Range para devolver cualquier número de formas o diapositivas, es más sencillo usar el método Item si desea devolver solo un único miembro de la colección. Por ejemplo, Shapes(1)
es más sencillo que Shapes.Range(1)
.
Utilice la propiedad ShapeRange del objeto Selection para devolver todas las formas de la selección. El siguiente ejemplo se establece el primer plano del relleno de color de todas las formas de la selección en la ventana uno, suponiendo que haya 's al menos una forma en la selección.
Windows(1).Selection.ShapeRange.Fill.ForeColor _
.RGB = RGB(255, 0, 255)
Use Selection.ShapeRange (index), donde index es el nombre de la forma o el número de índice, para devolver una sola forma dentro de la selección. El siguiente ejemplo se establece el primer plano del relleno de color para la forma dos de la colección de formas seleccionadas en la ventana uno, suponiendo que haya al menos dos formas en la selección.
Windows(1).Selection.ShapeRange(2).Fill.ForeColor _
.RGB = RGB(255, 0, 255)
Métodos
- Align
- Apply
- ApplyAnimation
- ConvertTextToSmartArt
- Copy
- Cut
- Delete
- Distribuir
- Duplicate
- Flip
- Group
- IncrementLeft
- IncrementRotation
- IncrementTop
- Elemento
- MergeShapes
- PickUp
- PickupAnimation
- Reagrupar
- RerouteConnections
- ScaleHeight
- ScaleWidth
- Select
- SetShapesDefaultProperties
- Ungroup
- UpgradeMedia
- ZOrder
Propiedades
- ActionSettings
- Adjustments
- AlternativeText
- AnimationSettings
- Application
- AutoShapeType
- BackgroundStyle
- BlackWhiteMode
- Callout
- Chart
- Child
- ConnectionSiteCount
- Connector
- ConnectorFormat
- Count
- Creator
- CustomerData
- Decorative
- Fill
- Glow
- GraphicStyle
- GroupItems
- HasChart
- HasInkXML
- HasSmartArt
- HasTable
- HasTextFrame
- Height
- HorizontalFlip
- Id
- InkXML
- IsNarration
- Left
- Line
- LinkFormat
- LockAspectRatio
- MediaFormat
- MediaType
- Model3D
- Nombre
- Nodes
- OLEFormat
- Parent
- ParentGroup
- PictureFormat
- PlaceholderFormat
- Reflection
- Rotation
- Shadow
- ShapeStyle
- SmartArt
- SoftEdge
- Tabla
- Tags
- TextEffect
- TextFrame
- TextFrame2
- ThreeD
- Título
- Top
- Tipo
- VerticalFlip
- Vertices
- Visible
- Width
- ZOrderPosition
Vea también
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.