Método Chart.ApplyLayout (Project)

Aplica o layout do gráfico especificado e o tipo de gráfico a um gráfico selecionado.

Sintaxe

expression. ApplyLayout(Layout,varChartType)

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Layout Obrigatório Long Especifica o tipo de layout, em que o valor corresponde a um item de Layout Rápido na faixa de opções.
varChartType Opcional Variantes Pode ser uma das constantes Office.XlChartType .
Layout Obrigatório INT32
varChartType Opcional Variantes

Valor de retorno

Nothing

Comentários

Quando você seleciona um gráfico em um relatório, a lista suspensa Layout Rápido está na guia DESIGN em FERRAMENTAS DE GRÁFICO na faixa de opções. Você pode alterar manualmente o tipo de gráfico usando o comando Alterar Tipo de Gráfico na mesma guia de faixa de opções.

Quando você usa um layout no tipo de gráfico atual, o parâmetro Layout é limitado ao número de itens na lista suspensa layout rápido . Use o parâmetro varChartType para aplicar o layout de um tipo de gráfico diferente no gráfico atual. Por exemplo, você pode aplicar os layouts que estão disponíveis de um gráfico de linha em um gráfico de coluna. O método ApplyLayout adiciona apenas os elementos do gráfico de linhas que também estão disponíveis para o tipo de gráfico de colunas.

Exemplo

O exemplo a seguir aplica o item layout rápido número 12 de um gráfico de linhas ao gráfico selecionado.

Sub SetChartLayout()
    Dim chartShape As Shape
    Dim reportName As String
    
    reportName = "Simple scalar chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    chartShape.Chart.ApplyLayout Layout:=12, varChartType:=Office.XlChartType.xlLine
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.