Método Shapes.AddChart (Project)
Crea un gráfico en la ubicación especificada en el informe activo. Devuelve un objeto Shape que representa el gráfico.
expresión.
AddChart
(Style,Type,Left,Top,Width,Height,NewLayout)
expresión Variable que representa un objeto Shapes.
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
Estilo | Opcional | Integer | Especifica el estilo de color del gráfico. Los valores corresponden a la lista desplegable Cambiar colores del grupo Estilos de gráfico , en la pestaña DISEÑO , en HERRAMIENTAS DE GRÁFICO en la cinta de opciones (pero los valores no están en el mismo orden). |
Tipo | Opcional | xlChartType | Tipo de gráfico que se va a agregar, como un gráfico de columnas o un gráfico circular. |
Left | Opcional | Single | Posición, medida en puntos, del borde izquierdo del gráfico. |
Top | Opcional | Single | Posición, medida en puntos, del borde superior del gráfico. |
Width | Opcional | Single | Ancho del gráfico, medido en puntos. |
Height | Opcional | Single | Alto del gráfico, medido en puntos. |
NewLayout | Opcional | Boolean | NewLayout no se usa en Project. |
Estilo | Opcional | INT | |
Tipo | Opcional | XLCHARTTYPE | |
Left | Opcional | FLOAT | |
Top | Opcional | FLOAT | |
Width | Opcional | FLOAT | |
Height | Opcional | FLOAT | |
NewLayout | Opcional | BOOL | |
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
Shape
En el ejemplo siguiente se crea un informe que tiene un tipo de gráfico de barras predeterminado con barras de color naranja.
Sub AddDefaultChart()
Dim chartReport As Report
Dim reportName As String
' Add a report.
reportName = "Test chart report"
Set chartReport = ActiveProject.Reports.Add(reportName)
' Add a chart.
Dim chartShape As shape
Set chartShape = ActiveProject.Reports(reportName).Shapes.AddChart(Style:=12)
With chartShape
.Chart.SetElement msoElementChartTitleAboveChart
.Chart.ChartTitle.Text = "Test Chart"
End With
End Sub
Objeto Shapes (objetode gráfico de objetos de formade objeto)
¿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.