Compartir a través de


Objeto ShapeRange (Project)

Representa un intervalo de formas, que es una colección de una o varias formas de un informe.

Comentarios

Project usa la misma infraestructura de Office Art que usan 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 ShapeRange . Por ejemplo, Project no admite la alineación, distribución, agrupación o combinación automáticas de formas en un intervalo de formas.

Un intervalo de formas puede contener una sola forma o todas las formas del informe. Puede incluir las formas que quiera construir un intervalo de formas. Por ejemplo, puede construir una colección ShapeRange que contenga las tres primeras formas de un informe, todas las formas de un informe o solo las formas de triángulo.

[!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 tipos diferentes o una forma que no es totalmente compatible con Project, pueden producir un error. Por ejemplo, si un intervalo de formas contiene un rectángulo y un gráfico, e intenta establecer la propiedad Fill , se produce un error en la instrucción porque un gráfico no implementa la propiedad Fill . En otros casos, por ejemplo, si usa la propiedad Rotation en un intervalo 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 de índice o nombres. 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 intervalo de formas.

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

Métodos

Descripción
El método Align no se implementa en Project.
Aplica formato a un intervalo de formas, donde la información de formato se ha copiado mediante el método PickUp .
Copia el intervalo de formas en el Portapapeles.
Corta el intervalo de formas en el Portapapeles.
Elimina el intervalo de formas.
El método Distribute no se implementa en Project.
Duplica un intervalo de formas y devuelve una referencia a la copia.
Voltea cada forma en el intervalo de formas alrededor de su eje horizontal o vertical.
El método Group no se implementa en Project.
Mueve cada forma del intervalo de formas horizontalmente por el número de puntos especificado.
Gira cada forma del intervalo de formas alrededor del eje z según el número de grados especificado.
Mueve cada forma del intervalo de formas verticalmente por el número de puntos especificado.
Obtiene un objeto Shape individual de la colección de intervalos de formas.
El método MergeShapes no se implementa en Project.
Copia el formato del intervalo de formas.
El método Regroup no se implementa en Project.
El método RerouteConnections no se implementa en Project.
Escala el alto del intervalo de formas según un factor especificado.
Escala el ancho del intervalo de formas según un factor especificado.
Selecciona cada forma en un intervalo de formas.
Aplica el formato de una forma predeterminada a cada forma del rango.
El método Ungroup no se implementa 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.