Hi All,
Anyone knows how to get a row/column count instead of specifying them as in
foreach my $row (2..130)
foreach my $column (2..130)
Thanks
I.S
use strict;
use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft Excel';
$Win32::OLE::Warn = 3; # die on errors...
my $Excel = Win32::OLE->GetActiveObject('Excel.Application')
|| Win32::OLE->new('Excel.Application', 'Quit');
my $Book = $Excel->Workbooks->Open("A:\\perl\\codes.xls");
my $Sheet = $Book->Worksheets(1);
foreach my $row (2..130)
{
foreach my $col (1..3)
{
}
my $test = $Sheet->Cells($row,3)->{'Value'};
print "$test\n";
}
__________________________________________________________________
Your favorite stores, helpful shopping tools and great gift ideas. Experience the
convenience of buying online with Shop@Netscape! http://shopnow.netscape.com/
Get your own FREE, personal Netscape Mail account today at http://webmail.netscape.com/
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
