Comment exporter des graphiques vers des images dans Excel ?

Dans Excel, parfois, vous pouvez générer des graphiques à partir des données, afin que les données soient plus visuelles et directes. Si vous souhaitez enregistrer ou exporter les graphiques en tant qu'images pour certaines raisons, comment pourriez-vous faire ?

Exporter un graphique en image avec du code VBA

Exporter plusieurs graphiques/images/formes en images avec Kutools pour Excel

Exporter un graphique en image avec du code VBA

Le code VBA suivant peut vous aider à exporter un graphique sélectionné de la feuille de calcul active en tant qu'image. Et l'image sera enregistrée au même emplacement que le classeur que vous avez utilisé. Procédez comme suit :

1. Sélectionnez le graphique que vous souhaitez exporter.

2. Ensuite, maintenez les touches ALT + F11 enfoncées, et cela ouvre la fenêtre Microsoft Visual Basic pour Applications.

3. Cliquez sur Insérer > Module, et collez le code suivant dans la Fenêtre du Module.

VBA:Exporter un graphique en image

Option Explicit
Sub ExportChart()
Const sSlash$ = "/"
Const sPicType$ = ".gif"
Dim sChartName$
Dim sPath$
Dim sBook$
Dim objChart As ChartObject
On Error Resume Next
Set objChart = ActiveSheet.ChartObjects(1)
If objChart Is Nothing Then
MsgBox "No charts have been detected on this sheet", 0
Exit Sub
End If
If ActiveChart Is Nothing Then
MsgBox "You must select a single chart for exporting ", 0
Exit Sub
End If
Start:
sChartName = Application.InputBox("Please Specify a name for the exported chart" & vbCr & _
"There is no default name available" & vbCr & _
"The chart will be saved in the same folder as this file", "Chart Export", "")
If sChartName = Empty Then
MsgBox "You have not entered a name for this chart", , "Invalid Entry"
Goto Start
End If
If sChartName = "False" Then
Exit Sub
End If
sBook = ActiveWorkbook.Path
sPath = sBook & sSlash & sChartName & sPicType
ActiveChart.Export Filename:=sPath, FilterName:="GIF"
End Sub

4. Ensuite, appuyez sur la touche F5 pour exécuter ce code, et entrez le nom du graphique exporté dans la boîte de dialogue, voir capture d'écran :

5. Et puis cliquez sur OK, le graphique sélectionné a été exporté au format Gif, et enregistré au même emplacement que le fichier original. Voir capture d'écran :

Avec le code VBA ci-dessus, vous pouvez uniquement exporter un graphique à la fois, si vous souhaitez exporter d'autres graphiques, veuillez d'abord sélectionner un autre graphique, puis l'exporter avec le code.

Exporter plusieurs graphiques/images/formes en images avec Kutools pour Excel

L'utilitaire Exporter le graphique de Kutools pour Excel peut exporter plusieurs graphiques, images ou formes à la fois dans Excel.

Après avoir installé Kutools pour Excel, veuillez procéder comme suit : (Téléchargez gratuitement Kutools pour Excel maintenant !)

1. Cliquez sur Kutools Plus > Importer / Exporter > Exporter le graphique, voir capture d'écran :

2. Dans le Exporter le graphique boîte de dialogue, tous les graphiques, images et formes ont été listés dans la boîte de liste de gauche, spécifiez le type que vous souhaitez exporter, puis cliquez sur  bouton pour spécifier un dossier pour enregistrer les graphiques exportés, en même temps, vous pouvez choisir le format des images à partir du format d'exportation selon vos besoins, tel que GIF, JPEG, TIF ou PNG.

3. Ensuite, cliquez sur OK, tous les graphiques, images et formes ont été exportés à l'emplacement spécifié avec succès. Voir captures d'écran :

  Démo : Exporter le graphique