Criando um gráfico via macro.

Todos nós sabemos que uma macro pode economizar muito o tempo de um usuário ou desenvolvedor que utiliza o Microsoft Excel.

Neste exemplo mostraremos como criar um simples gráfico de colunas via macro.

Em nosso exemplo vamos utilizar os seguintes dados:

Para criar uma gráfico na própria planilha é só criar um módulo e digitar o seguinte código.

Sub Criar_Grafico_Plan()

    Range("A1:C5").Select
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlColumnClustered
    ActiveChart.SetSourceData Source:=Range("Plan1!$A$1:$C$5")
    ActiveChart.SetElement (msoElementChartTitleAboveChart)
    ActiveChart.ChartTitle.Text = "Vendas ano 2008"
    Range("A1").Select
    

End Sub