pb rowrange

pb rowrange - Perl - Programmation

Marsh Posté le 07-06-2006 à 18:25:10    

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: :D  
 

Code :
  1. use strict;
  2. use Spreadsheet::WriteExcel;
  3. use Spreadsheet::ParseExcel;
  4. use warnings;
  5. use Win32::OLE qw(in with);
  6. use CGI::Carp qw(fatalsToBrowser);
  7. use Win32::OLE::Const 'Microsoft Excel';
  8. $Win32::OLE::Warn = 3;
  9. # Création d'une nouvelle instance du package pour Excel
  10. my $Excel = Win32::OLE->GetActiveObject('Excel.Application') || Win32::OLE->new('Excel.Application', 'Quit');
  11. # Ouverture du fichier Excel "C:\\stat.xls"
  12. #my $Book = $Excel->Workbooks->Open("E:\\Mes documents Sandra\\Etudes\\METHODO ET MACRO\\convertir.xls" );
  13. my $Book = $Excel->Workbooks->Open("C:\\Documents and Settings\\TecKnowMetrix\\Mes documents\\travail\\convertir.xls" );
  14. # Affectation du 1er classeur à la variable $Sheet
  15. my $Sheet = $Book->Worksheets(1);
  16. # Récupération des valeurs de toutes les cellules comprises entre B2 et B10
  17. my @toto = $Sheet->RowRange();
  18. 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".

Reply

Marsh Posté le 07-06-2006 à 18:25:10   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed