#!/usr/bin/perl -w use Win32::OLE; use Win32::OLE::Const 'Microsoft Excel'; use strict; # création d'un objet OLE sur MS Excel my $xls_app = Win32::OLE->new( 'Excel.Application' ) or die "Impossible de se connecter à MS Excel, $!"; # Lancer Excel. $xls_app->{'Visible'} = 1; my $workbook= $xls_app->Workbooks->Add(); # Graphique my $feuil = $workbook->Worksheets(1); my $chart_range = $feuil->Range("B3:C3"); my $chart = $xls_app->Charts->Add(); # Type de graphique $chart->{'ChartType'} = xlAreaStacked; $chart->SetSourceData( { Source => $chart_range, PlotBy => xlColumns } ); $chart->{'HasTitle'} = 1; $chart->ChartTitle->{'Text'} = "Rapport 2010";
Livres sur ce sujet
[amazon_image id=”2841773698″ link=”true” target=”_blank” size=”medium” ]De l’art de programmer en Perl[/amazon_image][amazon_image id=”2914010729″ link=”true” target=”_blank” size=”medium” ]Perl pour l’impatient[/amazon_image][amazon_image id=”2841771407″ link=”true” target=”_blank” size=”medium” ]Programmation en Perl, 3ème édition[/amazon_image][amazon_image id=”B005ELPHNA” link=”true” target=”_blank” size=”medium” ]Perl moderne: L’essentiel des pratiques actuelles[/amazon_image][amazon_image id=”2914010656″ link=”true” target=”_blank” size=”medium” ]Les expressions régulières par l’exemple[/amazon_image][amazon_image id=”2914010869″ link=”true” target=”_blank” size=”medium” ]Les meilleures bibliothèques pour Perl[/amazon_image]