Coleção Charts

Charts Vários objetos

Uma coleção de todas folhas de gráfico da pasta de trabalho ativa ou especificada. Cada folha de gráfico é representada por um objeto Chart. Isso não inclui gráficos incorporados em planilhas ou folhas de caixa de diálogo. Para obter informações sobre gráficos incorporados, consulte o objeto Chart ou ChartObject.

Usar a coleção Chart

Use a propriedade Charts para retornar a coleção Charts. O exemplo seguinte imprime todas as folhas de gráfico da pasta de trabalho ativa.

Charts.PrintOut

Use o método Add para criar uma nova folha de gráfico e adicioná-la à pasta de trabalho. O exemplo a seguir adiciona uma nova folha de gráfico à pasta de trabalho ativa e insere a nova folha de gráfico imediatamente após a planilha chamada Sheet1.

Charts.Add After:=Worksheets("Sheet1")

Você pode combinar o método Add com o método ChartWizard para adicionar um novo gráfico que contenha dados de uma planilha. O exemplo a seguir adiciona um novo gráfico de linhas baseado nos dados das células A1:A20 da planilha chamada Sheet1.

With Charts.Add
    .ChartWizard source:=Worksheets("Sheet1").Range("A1:A20"), _
        Gallery:=xlLine, Title:="February Data"
End With

Use Charts(índice), onde índice é o nome ou número de índice da folha de gráfico, para retornar um único objeto Chart. O exemplo seguinte altera a cor da seqüência um na planilha de gráfico um para vermelho.

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

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