Método Shapes.AddChart (Project)

  • Artigo

Cria um gráfico no local especificado no relatório ativo. Retorna um objeto Shape que representa o gráfico.

Sintaxe

expression. AddChart(Style,Type,Left,Top,Width,Height,NewLayout)

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 suspensa Alterar Cores no grupo Estilos de Gráfico , na guia DESIGN , em FERRAMENTAS CHART na faixa de opções (mas os valores não estão na mesma ordem).
Type Opcional xlChartType O tipo de gráfico a ser adicionado, como um gráfico de colunas ou um gráfico de pizza.
Left Opcional Single A posição, medida em pontos, da borda esquerda do gráfico.
Top Opcional Single A posição, medida em pontos, da borda 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 é usado 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 a seguir cria um relatório que tem um tipo de gráfico de barras padrão com barras de cor 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 Shapes ObjectChart

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.