I am actually looking for a row count in the while spreadsheet nt just a range.
La cuisson du pot au feu <[EMAIL PROTECTED]> wrote: >Le Mardi 23 Octobre 2001 16:24, F.H a écrit : >You need to use >Range["B9"]->CurrentRegion->Rows->Count; >Range["B9"]->CurrentRegion->Column->Count; > > >hi, Alone; > > >> 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/ > __________________________________________________________________ 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]