Método Chart.SetElement (Project)

Adiciona o elemento especificado a um gráfico ou a um objeto selecionado em um gráfico.

Sintaxe

expression. SetElement(RHS)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
RHS	Obrigatório	MsoChartElementType	Uma das constantes de enumeração para o tipo de elemento gráfico a ser adicionado.

Valor de retorno

Nothing

Comentários

O valor RHS do método SetElement corresponde a itens no submenu Adicionar Elemento do Gráfico . Itens diferentes estão habilitados, dependendo do tipo de gráfico. Se você tentar adicionar um elemento que não existe para um gráfico específico, você receberá um erro não especificado. Por exemplo, em um gráfico 3D, o item Barras de Erro na lista suspensa Adicionar Elemento gráfico não está disponível. Uma chamada para resultar Chart.SetElement msoElementErrorBarStandardDeviation em um erro.

Exemplo

O exemplo a seguir adiciona linhas de grade menores ao eixo de valor e adiciona chamadas de rótulo de dados à segunda série de dados.

Sub TestSetElements()
    Dim chartShape As Shape
    Dim reportName As String
    
    reportName = "Simple 3D chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    With chartShape.Chart
        .SetElement msoElementChartTitleAboveChart
        
        ' Select the major gridlines on the value axis, and then add minor gridlines.
        .axes(Office.xlValue).MajorGridlines.Select
        .SetElement msoElementPrimaryCategoryGridLinesMinor
        
        ' Select the second data series and add data label callouts.
        If .SeriesCollection.Count > 1 Then
            .SeriesCollection(2).Select
            .SetElement msoElementDataLabelCallout
        End If
    End With
End Sub

Confira também

Objeto Chart

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.