Objeto ShapeRange (proyecto)

Representa un rango de formas, que es la colección de una o más formas en un informe.

Comentarios

Project usa la misma infraestructura de Office Art que otras aplicaciones de Office y adapta Office Art a informes, tablas y gráficos que pueden usar campos en el proyecto activo. Sin embargo, Project no implementa todas las operaciones de ShapeRange . Por ejemplo, Project no admite la alineación, distribución, agrupación o combinación automáticas de formas en un rango de formas.

Un rango de formas puede contener una sola forma o todas las formas del informe. Puede incluir las formas que desee para construir un rango de formas. Por ejemplo, puede crear una colección ShapeRange que contenga las tres primeras formas de un informe, todas las formas de un informe o solo las formas triangulares.

[!NOTA] La mayoría de las operaciones que se pueden hacer con un objeto Shape, también puede realizarlas con un objeto ShapeRange que contiene sólo una forma. Algunas operaciones, cuando se realizan en un objeto ShapeRange que contiene más de una forma, formas de diferentes tipos o una forma que no es totalmente compatible con Project, pueden provocar un error. Por ejemplo, si un rango de formas contiene un rectángulo y un gráfico e intenta establecer la propiedad Relleno , se produce un error en la instrucción porque un gráfico no implementa la propiedad Relleno . En otros casos, por ejemplo, si usa la propiedad Rotación en un rango de formas que contiene un gráfico y un rectángulo, Project gira el rectángulo, pero omite el gráfico de forma silenciosa.

Ejemplos

Puede devolver un conjunto de formas especificadas por el número de índice o por el nombre de la forma. Use Shapes.Range(index), donde index es una matriz de números o nombres de índice. Por ejemplo, las dos instrucciones siguientes son válidas:

Set myRange1 = theReport.Shapes.Range(Array(1, 2))
Set myRange2 = theReport.Shapes.Range(Array("Textbox 1", "Textbox 2"))

Para crear un objeto ShapeRange que contenga todas las formas del informe, use una instrucción como la siguiente:

Set allShapes = theReport.Shapes.Range(Array(1, theReport.Shapes.Count))

Para crear un objeto ShapeRange con un único miembro de la colección Shapes , puede usar instrucciones como las siguientes:

Set myRange3 = theReport.Shapes.Range(2)
Set myRange4 = theReport.Shapes.Range("Rectangle 2")

Para realizar una operación en una sola forma de una colección ShapeRange , puede usar instrucciones como las siguientes:

myRange1(2).Fill.ForeColor.RGB = RGB(120, 120, 80)
myRange1("Textbox 2").Fill.ForeColor.RGB = RGB(120, 120, 80)

Como alternativa, puede realizar una operación directamente en un objeto Shape , sin usar un rango de formas.

theReport.Shapes("Big rectangle").Fill.ForeColor.RGB = RGB(120, 120, 80)

Métodos

Descripción
El método Align no está implementado en Project.
Aplica formato a un rango de formas, donde se ha copiado la información de formato mediante el método PickUp .
Copia el rango de formas en el Portapapeles.
Corta el rango de formas en el Portapapeles.
Elimina el rango de formas.
El método Distribute no está implementado en Project.
Duplica un rango de formas y devuelve una referencia a la copia.
Voltea cada forma del rango de formas alrededor de su eje horizontal o vertical.
El método Group no está implementado en Project.
Mueve cada forma del rango de formas horizontalmente un número especificado de puntos.
Gira cada forma en el rango de formas alrededor del eje z en el número de grados especificado.
Mueve cada forma del rango de formas verticalmente un número especificado de puntos.
Obtiene un objeto Shape individual en la colección de rangos de formas.
El método MergeShapes no está implementado en Project.
Copia el formato del rango de formas.
El método Reagrupar no está implementado en Project.
El método RerouteConnections no se implementa en Project.
Escala la altura de la gama de formas según un factor especificado.
Escala el ancho del rango de formas por un factor especificado.
Selecciona cada forma de un rango de formas.
Aplica el formato de una forma predeterminada a cada forma del rango.
El método Ungroup no está implementado en Project.
Mueve el intervalo de formas delante o detrás de otras formas (es decir, cambia la posición en el orden z).

Propiedades

Nombre
Adjustments
AlternativeText
Application
AutoShapeType
BackgroundStyle
BlackWhiteMode
Callout
Chart
Child
ConnectionSiteCount
Connector
ConnectorFormat
Count
Fill
Glow
GroupItems
HasChart
HasTable
Height
HorizontalFlip
ID
Left
Line
LockAspectRatio
Name
Nodes
Parent
ParentGroup
Reflection
Rotation
Script
Shadow
ShapeStyle
SoftEdge
Tabla
TextEffect
TextFrame
TextFrame2
ThreeD
Título
Top
Tipo
Value
VerticalFlip
Vertices
Visible
Width
ZOrderPosition

Vea también

Objeto Shapes

Objeto Shape

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.