Página 2 de 2

Re: Problemas con XLSX grandes

NotaPublicado: 2014-02-12 11:47 @533
por audax
Encontré una solución que por ahora me sirve, con la restricción que solo sirve para máquinas con Windows (me gustaría poder abarcar con Linux, pero bueno, me sirve). Apliqué el siguiente código.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. use strict;
  2. use Win32::OLE;
  3. use Win32::OLE qw(in with);
  4. use Win32::OLE::Variant;
  5. use Win32::OLE::Const 'Microsoft Excel';
  6.  
  7. #### File location
  8. my $Filename = ('C:\xxx\excel.xlsx');
  9.  
  10. #### Open Excel
  11. my $Excel = Win32::OLE->new('Excel.Application', 'Quit');
  12. # $Excel->{SheetsInNewWorkbook} = 0;
  13. my $Book1 = $Excel->Workbooks->Open($Filename) || die("Could not open file!");
  14. my $Sheet1 = $Book1->Worksheets(1);
  15.  
  16. $Book1->SaveAs({Filename =>'C:\xxxx\Salida.txt', FileFormat => xlTextMSDOS});
  17.  
  18. print "resulto!";
  19. #### Close
  20. $Book1->Close;
  21. $Excel->Quit;
  22.  
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4


Gracias, amigo, por tu ayuda.
Saludos.

Re: Problemas con XLSX grandes

NotaPublicado: 2014-02-21 10:41 @487
por MARKO
Te direcciono hacia algo de win32::Ole que ya había publicado antes.

Éxitos.