Modification d'un graphe sous Excel avec PERL
Bonjour
J'arrive avec PERL actuellement a créer un graphique sous excel avec légende et tout, mais j'arrive pas par contre a modifier l'axe des abscisses.
Voila ce que j'obtiens actuellement :
http://img171.imageshack.us/img171/3...igintr7.th.jpg
et voila ce que je veux obtenir :
http://img403.imageshack.us/img403/651/finalsh5.th.jpg
L'operation revient a choisir sous Excel manuellement les valeurs min et max dans l'axe des abscisses et a inverser l'ordre.
Quelqu'un peut m'aider, sachant que j'utilise (en partie) le code suivant :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| $Chart->{ChartType} = $chart_type;
$Chart->SetSourceData({Source => $Range, PlotBy => xlColumns});
# Add a title to the chart
$Chart->{HasTitle} = 1;
$Chart->ChartTitle->{Text} = "PESQ_MOS for $chart_title";
# Add a legend to the chart
$Chart->{HasLegend} = 1;
$Chart->Legend->{Position} = xlTop;
# Set the location of the chart
$Chart->Location ({Where => xlLocationAsObject, Name => "MOS figure"});
# Save as Excel
$Book->SaveAs({Filename =>$path,
FileFormat => xlWorkbookNormal});
# Close and quit Excel
$Book->Close();
$Excel->Quit(); |
Merci d'avance
