Comment supprimer des graphiques à l’aide de VBA (avec exemples)

Vous pouvez utiliser les méthodes suivantes dans VBA pour supprimer des graphiques dans Excel :

Méthode 1 : supprimer tous les graphiques de la feuille active

Sub DeleteActiveSheetCharts()
ActiveSheet.ChartObjects.Delete
End Sub

Cette macro particulière supprimera tous les graphiques de la feuille actuellement active dans Excel.

Méthode 2 : supprimer tous les graphiques du classeur entier

Sub DeleteAllWorkbookCharts()

Dim wk As Worksheet

For Each wk In Worksheets

    If wk.ChartObjects.Count > 0 Then
        wk.ChartObjects.Delete
    End If
    
Next wk

End Sub

Cette macro particulière supprimera tous les graphiques de chaque feuille de l’ensemble du classeur Excel.

Les exemples suivants montrent comment utiliser chaque méthode dans la pratique.

Exemple 1 : supprimer tous les graphiques de la feuille active

Supposons que nous ayons la feuille Excel suivante contenant deux graphiques :

Nous pouvons créer la macro suivante pour supprimer tous les graphiques de cette feuille :

Sub DeleteActiveSheetCharts()
ActiveSheet.ChartObjects.Delete
End Sub

Lorsque nous exécutons cette macro, nous recevons le résultat suivant :

Notez que les deux graphiques ont été supprimés de la feuille.

Exemple 2 : supprimer tous les graphiques de l’intégralité du classeur

Supposons que nous ayons une autre feuille dans notre classeur Excel contenant deux autres graphiques :

Nous pouvons créer la macro suivante pour supprimer tous les graphiques des deux feuilles du classeur :

Sub DeleteAllWorkbookCharts()

Dim wk As Worksheet

For Each wk In Worksheets

    If wk.ChartObjects.Count > 0 Then
        wk.ChartObjects.Delete
    End If
    
Next wk

End Sub

Une fois cette macro exécutée, tous les graphiques des deux feuilles seront supprimés :

Notez que dans cet exemple, nous avons uniquement supprimé les graphiques de deux feuilles, mais cette macro fonctionnera avec un classeur Excel comportant n’importe quel nombre de feuilles.

Ressources additionnelles

Les didacticiels suivants expliquent comment effectuer d’autres tâches courantes dans VBA :

VBA : Comment supprimer des lignes en fonction de la valeur de la cellule
VBA : Comment supprimer une feuille si le nom contient un texte spécifique
VBA : comment supprimer des fichiers