voila j'ai trouver chez cpan: http://search.cpan.org/search?quer [...] l&mode=all
la fonction Rowrange qui me permet de compter le nombre de case util dans un fichier excel mon problème c'est que ca me met une erreur: 
Code :
- use strict;
- use Spreadsheet::WriteExcel;
- use Spreadsheet::ParseExcel;
- use warnings;
- use Win32::OLE qw(in with);
- use CGI::Carp qw(fatalsToBrowser);
- use Win32::OLE::Const 'Microsoft Excel';
- $Win32::OLE::Warn = 3;
- # Création d'une nouvelle instance du package pour Excel
- my $Excel = Win32::OLE->GetActiveObject('Excel.Application') || Win32::OLE->new('Excel.Application', 'Quit');
- # Ouverture du fichier Excel "C:\\stat.xls"
- #my $Book = $Excel->Workbooks->Open("E:\\Mes documents Sandra\\Etudes\\METHODO ET MACRO\\convertir.xls" );
- my $Book = $Excel->Workbooks->Open("C:\\Documents and Settings\\TecKnowMetrix\\Mes documents\\travail\\convertir.xls" );
- # Affectation du 1er classeur à la variable $Sheet
- my $Sheet = $Book->Worksheets(1);
- # Récupération des valeurs de toutes les cellules comprises entre B2 et B10
- my @toto = $Sheet->RowRange();
- print "@toto\n";
|
donne cette erreur:
[Wed Jun 7 18:19:21 2006] extraction_numeros_brevets_famille.pl: Win32::OLE(0.1702) error 0x80020003: "Membre introuvable"
[Wed Jun 7 18:19:21 2006] extraction_numeros_brevets_famille.pl: in METHOD/PROPERTYGET "" at extraction_numeros_brevets_famille.pl line 22
J'ai pas bien compris pourquoi il voulai pas donc je demande car comme la dit un modo chez vous (perdu sont nom) "l'imbécile c'est celui qui a un pb et qui ne le dit pas".
