Bonjour,

Je recherche à sauvegarder un graphique dans une image jpeg.

Voila dans mon code principal :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
dim objChart as New Chart
dim objClass as New WorkBook
...
...
Set objClass = ThisWorkBook
Set objChart = ActiveWorkbook.Charts.Add
...
...(Création du graphique et de sa mise en forme)
SaveChartToJPEG objchart
Soit ma fonction :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
Sub SaveChartToJPEG ( objChart as Chart)
{
  Dim PathFile As String
  PathFile = "Nom du Chemin"
  objChart.Export Filename = PathFile, FilterName:="JPEG" 
}
Malheureusement j'ai des erreurs lors de l'export.
N'étant pas un spécialiste de VBA pourriez vous m'aider ?
Merci

(ps : j'utilise Excel 2007 en évaluation )