in reply to how to convert excel file to text file?

What manner of "doesn't seem to work"? Generates an error? Generates a file, but not as you would like? Generates an empty file? Doesn't generate a file and doesn't generate an error? Something else?

Update: your code (adjusted to use one of my spread sheets) works for me. Are you sure you have the paths and worksheet names correct? You do use strictures (use strict; use warnings;) don't you? You will get warnings if you have used the wrong worksheet name for example.

Perl is environmentally friendly - it saves trees
  • Comment on Re: how to convert excel file to text file?

Replies are listed 'Best First'.
Re^2: how to convert excel file to text file?
by poolboi (Acolyte) on Mar 13, 2008 at 08:58 UTC
    hi
    when i use perl, it doesn't save the info as text file, no text file appear and when i run it, if it doesn't work, the dos like screen just end the program by itself the path to the file i've check it a lot of times, and still it doesn't work
[reply]

      You might like to modify the path in the following then see if it works as a sanity check:

      use strict;
use warnings;
use Win32::OLE::Const;
use Win32::OLE::Const 'Microsoft Excel';

my $path = 'C:\Delme~~';
my $Excel = Win32::OLE->new ("Excel.Application", sub { $_[0]->Quit })
  or die Win32::OLE::LastError;
$Excel->{Visible} = 1;

my $Book = $Excel->Workbooks->Add ();
my $Sheet = $Book->Worksheets ('Sheet1');

$Sheet->Range ('A1')->{Value} = "Hello World";
$Sheet->Range ('A2')->{Value} = "Hi World";
$Excel->{DisplayAlerts} = 0;    # avoid being prompted
$Sheet->SaveAs ({FileName   => "$path\\test.txt", FileFormat => xlText
+})
    or die Win32::OLE::LastError;
$Book->Close ();
$Excel->Quit;

open IN, '<', "test.txt";
print <IN>;
close IN;

      [download]

      Prints:

      Hello World
Hi World

      [download]
      Perl is environmentally friendly - it saves trees
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom