Gráficos VBA - Como criar gráficos no Excel usando o código VBA?

• Gráficos no Excel VBA

Gráficos no Excel VBA

A visualização é muito importante em qualquer dado. No Excel, quando apresentamos dados em tabelas e dinâmicas, pode ser difícil para outro usuário entender o cenário principal a partir dos dados. Portanto, no Excel, temos gráficos para apresentar nossos dados. Gráficos é a representação visual dos dados presentes nas linhas e colunas da planilha do Excel. Agora todos sabemos como inserir um gráfico em uma planilha do Excel. Neste tópico, aprenderemos sobre o uso de gráficos no VBA. É tão simples quanto usamos gráficos no Excel. Agora, como em uma planilha em que temos vários tipos de gráficos para optar da mesma forma, temos todos os gráficos no VBA também como um objeto. Tudo o que precisamos fazer é chamar esse objeto para usá-lo. Podemos criar gráficos do VBA na mesma planilha ou em uma planilha de gráfico separada. No entanto, é mais aconselhável usar gráficos em uma folha separada para evitar qualquer confusão.

Agora, quais são os gráficos no VBA? Gráficos são objetos simples no VBA. Podemos fazer dois tipos de gráficos no VBA. Um é conhecido como uma folha de gráfico, enquanto outro é conhecido como gráficos incorporados. Na planilha de gráfico, o VBA cria uma nova planilha para o gráfico. Fornecemos os dados de referência, que são outra planilha como dados de origem. Agora, gráficos incorporados são aqueles que estão presentes na mesma planilha dos dados. Agora, a codificação para esses dois tipos de gráficos é um pouco diferente uma da outra, que aprenderemos neste tópico. Para usar as propriedades do gráfico no VBA, usamos o símbolo de ponto (.) Como IntelliSense. Agora precisamos lembrar de uma coisa que existem vários tipos de gráficos no Excel. Se não fornecermos um tipo de gráfico ao nosso código, o VBA cria automaticamente um gráfico de colunas para nós por padrão. Obviamente, podemos mudar isso por algumas linhas de código.

Como criar gráficos no Excel VBA?

Agora, vamos aprender como criar gráficos no Excel VBA com alguns exemplos.

Você pode fazer o download deste modelo do Excel VBA Charts aqui - Modelo do Excel VBA Charts

Para todos os exemplos, consideraremos um dado presente na folha 1 da seguinte maneira:

Gráficos VBA do Excel - Exemplo # 1

Primeiro, vamos aprender como inserir um gráfico no VBA, para isso, siga as etapas abaixo:

Etapa 1: comece com um subprocedimento da seguinte maneira.

Código:

 Sub gráficos1 () End Sub 

Etapa 2: declarar uma variável como um objeto de gráfico.

Código:

 Sub Charts1 () Dim Cht As Subtítulo do gráfico 

Etapa 3: para usar os gráficos, precisamos chamar o método add, como mostrado abaixo.

Código:

 Sub Charts1 () Dim Cht As Chart Set Cht = Charts.Add End Sub 

Etapa 4: Para usar as propriedades do objeto de gráfico, insira uma Declaração With no código, como mostrado abaixo.

Código:

 Sub Gráficos1 () Dim Cht As Chart Set Cht = Charts.Add With Cht End With End Sub 

Etapa 5: Agora vamos fornecer uma fonte para este gráfico, comece com um operador de ponto e ele nos dará mais opções. Escreva o código a seguir abaixo para inserir uma fonte para o gráfico.

Código:

 Sub Charts1 () Dim Cht As Chart Set Cht = Charts.Add With Cht .SetSourceData Source: = Sheets ("Sheet1"). Range ("A1: B6") Terminar com End Sub 

Etapa 6: Agora lembre-se de que não fornecemos nenhum tipo de gráfico, primeiro execute o código acima pressionando a tecla F5 e veja que tipo de gráfico será inserido.

Temos uma nova planilha criada chamada Gráfico e ela contém nosso gráfico.

Etapa 7: agora vamos dar ao código o tipo de gráfico que queremos usar para esta representação,

Etapa 8: vamos selecionar a área 3D para este exemplo, como mostrado abaixo,

Código:

 Sub Charts1 () Dim Cht As Chart Set Cht = Charts.Add With Cht .SetSourceData Source: = Sheets ("Sheet1"). Range ("A1: B6") .ChartType = xl3DArea End With End Sub 

Etapa 9: execute o código pressionando a tecla F5 ou clicando no botão Reproduzir e verifique o tipo de gráfico na planilha.

Agora, lembre-se sempre que executarmos o código, ele criará uma nova planilha de gráfico para nós. Isso também é conhecido como planilha de gráfico porque cria gráficos em outra planilha.

Gráficos VBA do Excel - Exemplo # 2

Agora vamos criar um gráfico incorporado, o que significa gráfico na planilha dos dados de origem. Para isso, siga as etapas abaixo para criar um gráfico no Excel VBA.

Etapa 1: No mesmo módulo, inicie outro subprocedimento, como a seguir.

 Código: Sub Charts2 () End Sub 

Etapa 2: declare novamente uma variável como tipo de gráfico da seguinte maneira.

Código:

 Sub Charts2 () Dim Cht1 como Sub final do gráfico 

Etapa 3: A diferença nos gráficos incorporados é que nos referimos à planilha que possui os dados como planilha ativa pelo código a seguir mostrado abaixo.

Código:

 Sub Charts2 () Dim Cht1 como gráfico definido Cht1 = ActiveSheet.Shapes.AddChart.Chart End Sub 

Etapa 4: Agora, a parte restante da criação e design dos gráficos é semelhante, novamente colocamos uma declaração With no código da seguinte maneira.

Código:

 Sub Charts2 () Dim Cht1 como conjunto de gráficos Cht1 = ActiveSheet.Shapes.AddChart.Chart com Cht1 End With End Sub 

Etapa 5: vamos especificar um local onde nosso gráfico será, pois não queremos que ele fique sobre nossos dados, portanto, antes de With Statement, adicione o código a seguir onde definimos o gráfico da seguinte maneira.

Código:

 Sub Charts2 () Dim Cht1 como o conjunto de gráficos Cht1 = ActiveSheet.Shapes.AddChart (Esquerda: = 200, Largura: = 300, Parte superior: = 50, Altura: = 300) .Chart With Cht1 End With End Sub 

Etapa 6: Agora, forneça a fonte dos dados e do tipo de gráfico que queremos ser da seguinte maneira.

Código:

 Sub Charts2 () Dim Cht1 como o conjunto de gráficos Cht1 = ActiveSheet.Shapes.AddChart (Esquerda: = 200, Largura: = 300, Parte superior: = 50, Altura: = 300). Gráfico com Cht1 .SetSourceData Origem: = Sheets ("Sheet1 ") .Range (" A1: B6 ") .ChartType = xl3DArea End With End Sub 

Etapa 7: execute o código pressionando a tecla F5 ou clicando no botão Reproduzir e veja o resultado em nossa planilha onde os dados são os seguintes.

Isso é chamado de gráfico incorporado, pois o gráfico está na mesma planilha que os dados.

Gráficos VBA do Excel - Exemplo # 3

Também há outra maneira de criar um gráfico em nossas planilhas usando o VBA. Este método é conhecido como método ChartsObject.

Etapa 1: No mesmo módulo, vamos começar com um terceiro subprocedimento, como a seguir.

Código:

 Sub Gráficos3 () End Sub 

Etapa 2: Cone como dados da planilha, digite outro como intervalo e um como objeto de gráfico, como mostrado abaixo.

Código:

 Sub Gráficos3 () Dim WK como planilha, Rng como intervalo, Cht3 como ChartObject End Sub 

Etapa 3: primeiro defina a planilha para onde estão os dados, que é a planilha 1 neste caso.

Código:

 SubCharts3 () Dim WK como planilha, Rng como intervalo, Cht3 como ChartObject Set WK = Worksheets ("Sheet1") End Sub 

Etapa 4: agora selecione o intervalo de dados que temos da seguinte maneira.

Código:

 SubCharts3 () Dim WK como planilha, Rng como intervalo, Cht3 como ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") End Sub 

Etapa 5: agora defina o objeto do gráfico para adicionar o gráfico usando a propriedade do objeto do gráfico da seguinte maneira.

Código:

 SubCharts3 () Dim WK como planilha, Rng como intervalo, Cht3 como ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Esquerda: = ActiveCell.Left, Largura: = 400, Parte superior: = ActiveCell.Top, Altura: = 200) End Sub 

Etapa 6: Agora, vamos fornecer a fonte para o gráfico da seguinte maneira.

Código:

 SubCharts3 () Dim WK como planilha, Rng como intervalo, Cht3 como ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Esquerda: = ActiveCell.Left, Largura: = 400, Parte superior: = ActiveCell.Top, Altura: = 200) Cht3.Chart.SetSourceData Origem: = Rng End Sub 

Etapa 7: agora selecione o tipo de gráfico que queremos da mesma forma a seguir.

Código:

 SubCharts3 () Dim WK como planilha, Rng como intervalo, Cht3 como ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Esquerda: = ActiveCell.Left, Largura: = 400, Parte superior: = ActiveCell.Top, Altura: = 200) Fonte Cht3.Chart.SetSourceData: = Rng Cht3.Chart.ChartType = xl3DColumn End Sub 

Etapa 8: execute o código pressionando a tecla F5 ou clicando no botão Reproduzir e veja o resultado na folha 1.

Coisas para lembrar

• Podemos decidir que tipo de gráfico queremos usar definindo um tipo de gráfico.
• No tipo Gráfico, o número de vezes que executamos o código em que uma nova planilha é criada sob um nome de gráfico exclusivo, com um gráfico.
• O objeto gráfico também é membro de planilhas nas quais temos gráficos e planilhas.
• Para usar o objeto gráfico, precisamos usar uma instrução SET para definir o gráfico primeiro.

Artigos recomendados

Este é um guia para gráficos VBA. Aqui discutimos como criar gráficos no Excel usando o código VBA, além de exemplos práticos e modelo de excel para download. Você também pode consultar nossos outros artigos sugeridos -

1. PowerPoint VBA
2. Gráficos de combinação do Excel
3. O arquivo de verificação do VBA existe
4. Gráfico de colunas do Excel