Shapes.AddChart method (Project) (Método Shapes.AddChart [Projeto])

Artigo
10/25/2024

Cria um gráfico na localização especificada no relatório ativo. Devolve um objeto Forma que representa o gráfico.

Sintaxe

expression. AddChart (Estilo,Tipo,Esquerda,Superior,Largura,Altura,Nova Camada)

expressão Uma variável que representa um objeto Formas.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Estilo	Opcional	Integer	Especifica o estilo de cor do gráfico. Os valores correspondem à lista pendente Alterar Cores no grupo Estilos de Gráfico , no separador ESTRUTURA , em FERRAMENTAS DE GRÁFICO no friso (mas os valores não estão na mesma ordem).
Type	Opcional	xlChartType	O tipo de gráfico a adicionar, como um gráfico de colunas ou um gráfico circular.
Left	Opcional	Single	A posição, medida em pontos, do limite esquerdo do gráfico.
Top	Opcional	Single	A posição, medida em pontos, da margem superior do gráfico.
Width	Opcional	Single	A largura do gráfico, medida em pontos.
Height	Opcional	Single	A altura do gráfico, medida em pontos.
NewLayout	Opcional	Boolean	NewLayout não é utilizado no Project.
Estilo	Opcional	INT
Type	Opcional	XLCHARTTYPE
Left	Opcional	FLOAT
Top	Opcional	FLOAT
Width	Opcional	FLOAT
Height	Opcional	FLOAT
NewLayout	Opcional	BOOL
Nome	Obrigatório/Opcional	Tipo de dados	Descrição

Valor de retorno

Formato

Exemplo

O exemplo seguinte cria um relatório que tem um tipo de gráfico de barras predefinido com barras cor de laranja.

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

Confira também

Objeto de gráfico de objeto de forma de objeto de objeto de formas de formas

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

Partilhar via