Graphiques dans Excel VBA

La visualisation est très importante dans toutes les données. Dans Excel lorsque nous présentons des données dans des tableaux et pivotons, il peut être difficile pour un autre utilisateur de comprendre le scénario principal à partir des données. Donc, dans Excel, nous avons des graphiques pour présenter nos données. Les graphiques sont la représentation visuelle des données présentes dans les lignes et les colonnes de la feuille Excel. Maintenant, nous savons tous comment insérer un graphique dans une feuille de calcul Excel. Dans cette rubrique, nous allons découvrir comment utiliser les graphiques dans VBA. C'est aussi simple que nous utilisons des graphiques dans Excel. Maintenant, comme dans une feuille de calcul où nous avons différents types de graphiques à choisir, nous avons également tous les graphiques dans VBA comme objet. Tout ce que nous devons faire est d'appeler cet objet pour l'utiliser. Nous pouvons créer des graphiques à partir de VBA dans la même feuille de calcul ou dans une feuille de graphique distincte. Cependant, il est préférable d'utiliser des graphiques dans une feuille séparée pour éviter toute confusion.

Maintenant, quels sont les graphiques en VBA? Les graphiques sont des objets simples dans VBA. Nous pouvons créer deux types de graphiques en VBA. L'une est connue sous le nom de feuille de graphique tandis qu'une autre est connue sous le nom de graphiques intégrés. Dans la feuille de graphique, VBA crée une nouvelle feuille de calcul pour le graphique. Nous donnons les données de référence qui sont une autre feuille de calcul en tant que données source. Les graphiques intégrés sont maintenant les graphiques qui sont présents dans la même feuille de calcul des données. Maintenant, le codage de ces deux types de graphiques est légèrement différent l'un de l'autre que nous allons apprendre dans cette rubrique. Pour utiliser les propriétés du graphique dans VBA, nous utilisons le symbole point (.) Comme IntelliSense. Maintenant, nous devons nous rappeler une chose qu'il existe différents types de graphiques dans Excel. Si nous ne fournissons pas de type de graphique à notre code, VBA crée automatiquement un graphique à colonnes pour nous par défaut. Évidemment, nous pouvons changer cela en quelques lignes de code.

Comment créer des graphiques dans Excel VBA?

Maintenant, apprenons à créer des graphiques dans Excel VBA avec quelques exemples.

Vous pouvez télécharger ce modèle Excel de graphiques VBA ici - Modèle Excel de graphiques VBA

Pour tous les exemples, nous considérerons une donnée présente dans la feuille 1 comme suit,

Graphiques VBA Excel - Exemple # 1

Tout d'abord, apprenons comment insérer un graphique dans VBA, pour cela, suivez les étapes ci-dessous:

Étape 1: Commencez par une sous-procédure comme suit.

Code:

 Sous-graphiques1 () End Sub 

Étape 2: Déclarez une variable comme objet graphique.

Code:

 Sub Charts1 () Dim Cht As Chart End Sub 

Étape 3: Pour utiliser les graphiques, nous devons appeler la méthode add comme indiqué ci-dessous.

Code:

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

Étape 4: pour utiliser les propriétés des objets de graphique, insérez une instruction With dans le code, comme illustré ci-dessous.

Code:

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

Étape 5: Maintenant, fournissons une source à ce graphique, commençons par un opérateur point et il nous donnera d'autres options. Écrivez le code suivant ci-dessous pour entrer une source pour le graphique.

Code:

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

Étape 6: N'oubliez pas que nous n'avons fourni aucun type de graphique, exécutons d'abord le code ci-dessus en appuyant sur la touche F5 et voyons quel type de graphique sera inséré.

Nous avons créé une nouvelle feuille appelée un graphique et elle contient notre graphique.

Étape 7: Donnons maintenant au code le type de graphique que nous voulons utiliser pour cette représentation,

Étape 8: sélectionnons la zone 3D pour cet exemple comme indiqué ci-dessous,

Code:

 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 

Étape 9: Exécutez le code en appuyant sur la touche F5 ou en cliquant sur le bouton Lecture et vérifiez le type de graphique dans la feuille de calcul.

Maintenant, rappelez-vous que chaque fois que nous exécutons le code, il crée une nouvelle feuille de graphique pour nous. Ceci est également connu sous le nom de feuille de graphique car il crée des graphiques dans une autre feuille.

Graphiques VBA Excel - Exemple # 2

Faisons maintenant un graphique intégré, ce qui signifie un graphique dans la feuille des données source. Pour cela, suivez les étapes ci-dessous pour créer un graphique dans Excel VBA.

Étape 1: Dans le même module, démarrez une autre sous-procédure comme suit.

 Code: Sous-graphiques2 () End Sub 

Étape 2: déclarez à nouveau une variable comme type de graphique comme suit.

Code:

 Sub Charts2 () Dim Cht1 As Chart End Sub 

Étape 3: La différence dans les graphiques intégrés est que nous référons la feuille de calcul qui contient les données comme feuille active par le code suivant ci-dessous.

Code:

 Sub Charts2 () Dim Cht1 As Chart Set Cht1 = ActiveSheet.Shapes.AddChart.Chart End Sub 

Étape 4: Maintenant que le reste de la création et de la conception des graphiques est similaire, nous mettons à nouveau une instruction With dans le code comme suit.

Code:

 Sub Charts2 () Dim Cht1 As Chart Set Cht1 = ActiveSheet.Shapes.AddChart.Chart With Cht1 End With End Sub 

Étape 5: Spécifions un emplacement où notre graphique va être car nous ne voulons pas qu'il soit sur nos données, donc avant Avec Statement, ajoutez le code suivant à l'endroit où nous avons défini notre graphique comme suit.

Code:

 Sub Charts2 () Dim Cht1 As Chart Set Cht1 = ActiveSheet.Shapes.AddChart (Left: = 200, Width: = 300, Top: = 50, Height: = 300) .Chart with Cht1 End With End Sub 

Étape 6: Fournissons maintenant la source des données et le type de graphique que nous voulons être comme suit.

Code:

 Sub Charts2 () Dim Cht1 As Chart Set Cht1 = ActiveSheet.Shapes.AddChart (Left: = 200, Width: = 300, Top: = 50, Height: = 300) .Chart With Cht1 .SetSourceData Source: = Sheets ("Sheet1" ") .Range (" A1: B6 ") .ChartType = xl3DArea End With End Sub 

Étape 7: Exécutez le code en appuyant sur la touche F5 ou en cliquant sur le bouton Lecture et voyez le résultat dans notre feuille où les données sont les suivantes.

C'est ce qu'on appelle un graphique incorporé car le graphique est dans la même feuille que les données.

Graphiques VBA Excel - Exemple # 3

Il existe également une autre façon de créer un graphique dans nos feuilles de calcul à l'aide de VBA. Cette méthode est connue sous le nom de méthode ChartsObject.

Étape 1: Dans le même module, commençons par une troisième sous-procédure comme suit.

Code:

 Sous-graphiques3 () End Sub 

Étape 2: cône en tant que données de feuille de calcul, saisissez un autre comme plage et un comme objet graphique, comme indiqué ci-dessous.

Code:

 Sub Charts3 () Dim WK As Worksheet, Rng As Range, Cht3 As ChartObject End Sub 

Étape 3: définissez d'abord la feuille de calcul à l'emplacement des données, à savoir la feuille 1 dans ce cas.

Code:

 Sub Charts3 () Dim WK As Worksheet, Rng As Range, Cht3 As ChartObject Set WK = Worksheets ("Sheet1") End Sub 

Étape 4: Sélectionnez maintenant la plage de données que nous avons comme suit.

Code:

 Sub Charts3 () Dim WK As Worksheet, Rng As Range, Cht3 As ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") End Sub 

Étape 5: Maintenant, définissez l'objet graphique pour ajouter le graphique à l'aide de la propriété d'objet graphique comme suit.

Code:

 Sub Charts3 () Dim WK As Worksheet, Rng As Range, Cht3 As ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Left: = ActiveCell.Left, Largeur: = 400, Haut: = ActiveCell.Top, Hauteur: = 200) End Sub 

Étape 6: Maintenant, donnons la source du graphique comme suit.

Code:

 Sub Charts3 () Dim WK As Worksheet, Rng As Range, Cht3 As ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Left: = ActiveCell.Left, Largeur: = 400, Haut: = ActiveCell.Top, Hauteur: = 200) Cht3.Chart.SetSourceData Source: = Rng End Sub 

Étape 7: Sélectionnez maintenant le type de graphique que nous voulons de la manière suivante.

Code:

 Sub Charts3 () Dim WK As Worksheet, Rng As Range, Cht3 As ChartObject Set WK = Worksheets ("Sheet1") Set Rng = WK.Range ("A1: B6") Set Cht3 = WK.ChartObjects.Add (Left: = ActiveCell.Left, Largeur: = 400, Haut: = ActiveCell.Top, Hauteur: = 200) Cht3.Chart.SetSourceData Source: = Rng Cht3.Chart.ChartType = xl3DColumn End Sub 

Étape 8: Exécutez le code en appuyant sur la touche F5 ou en cliquant sur le bouton Lecture et voyez le résultat dans la feuille 1.

Choses dont il faut se rappeler

  • Nous pouvons décider du type de graphiques que nous voulons utiliser en définissant un type de graphique.
  • Dans Type de graphique, le nombre de fois que nous exécutons le code, une nouvelle feuille de calcul est créée sous un nom de graphique unique contenant un graphique.
  • L'objet graphique est également membre de feuilles dans lesquelles nous avons à la fois des graphiques et des feuilles.
  • Pour utiliser l'objet graphique, nous devons utiliser une instruction SET pour définir le graphique en premier.

Articles recommandés

Ceci est un guide des graphiques VBA. Nous expliquons ici comment créer des graphiques dans Excel à l'aide du code VBA ainsi que des exemples pratiques et un modèle Excel téléchargeable. Vous pouvez également consulter nos autres articles suggérés -

  1. VBA PowerPoint
  2. Graphiques de combinaison Excel
  3. Le fichier de vérification VBA existe
  4. Graphique à colonnes Excel

Catégorie: