Objeto Chart

Vários objetos Chart Vários objetos

Representa um gráfico em uma pasta de trabalho. O gráfico pode ser um gráfico incorporado (contido em um ChartObject) ou uma folha de gráfico separada.

Usando o objeto Chart

As seguintes propriedades e métodos para retornar um objeto Chart são descritos nesta seção:

• Propriedade Chart
• Método Charts
• Propriedade ActiveChart
• Propriedade ActiveSheet

Propriedade Chart

Use a propriedade Chart para retornar um objeto Chart representando o gráfico contido em um objeto ChartObject. O exemplo seguinte define o padrão para a área de gráfico no gráfico incorporado um na planilha chamada "Sheet1".

Worksheets("Sheet1").ChartObjects(1).Chart. _
    ChartArea.Interior.Pattern = xlLightDown

Método Charts

A coleção Charts contém um objeto Chart para cada folha de gráfico em uma pasta de trabalho. Use Charts(índice), onde índice é o número de índice ou nome da folha de gráfico, para retornar um único objeto Chart. O exemplo seguinte altera a cor da seqüência um na folha de gráfico um.

Charts(1).SeriesCollection(1).Interior.Color = RGB(255, 0, 0)

O número de índice do gráfico representa a posição da folha de gráfico na barra de guias da pasta de trabalho. Charts(1) é o primeiro gráfico (mais à esquerda) na pasta de trabalho; Charts(Charts.Count) é o último (mais à direita). Todas as folhas de gráfico estão incluídas na contagem de índice, mesmo que estejam ocultas. O nome da folha de gráfico é mostrado na guia de pasta de trabalho do gráfico. Você pode usar a propriedade Name para definir ou retornar o nome do gráfico.

O exemplo a seguir move o gráfico chamado Sales para o final da pasta de trabalho ativa.

Charts("Sales").Move after:=Sheets(Sheets.Count)

O objeto Chart é também um membro da coleção Sheets. A coleção Sheets contém todas as planilhas da pasta de trabalho (tanto folhas de gráfico quanto planilhas). Use Sheets(índice), onde índice é o nome ou número de índice da planilha, para retornar uma única planilha.

Propriedade ActiveChart

Quando um gráfico é o objeto ativo, você pode usar a propriedade ActiveChart para fazer referência a ele. Uma folha de gráfico está ativa se o usuário a selecionou ou se ela foi ativada com o método Activate. O exemplo seguinte ativa a folha de gráfico um e, em seguida, define o título e o tipo do gráfico.

Charts(1).Activate
With ActiveChart
    .Type = xlLine
    .HasTitle = True
    .ChartTitle.Text = "January Sales"
End With

Um gráfico incorporado estará ativo se o usuário o tiver selecionado ou se o objeto ChartObject nele contido tiver sido ativado com o método Activate. O exemplo seguinte ativa o gráfico incorporado um na planilha um e, em seguida, define o tipo e o título do gráfico. Observe que após o gráfico incorporado ser ativado, o código neste exemplo é o mesmo do exemplo anterior. Usar a propriedade ActiveChart permite que você escreva código do Visual Basic que possa fazer referência a um gráfico incorporado ou a uma folha de gráfico (o que estiver ativo).

Worksheets(1).ChartObjects(1).Activate
ActiveChart.Type = xlLine
ActiveChart.HasTitle = True
ActiveChart.ChartTitle.Text = "January Sales"

Propriedade ActiveSheet

Quando uma folha de gráfico for a folha ativa, você poderá usar a propriedade ActiveSheet para fazer referência a ela. O exemplo a seguir usa o método Activate para ativar a folha de gráfico chamada Chart1 e, em seguida, define a cor interior como azul para a seqüência um do gráfico.

Charts("chart1").Activate
ActiveSheet.SeriesCollection(1).Interior.ColorIndex = 5