Philipp Hasenfratz: Spreadsheet::WriteExcel in bestehende Datei

Beitrag lesen

Halihallo Dirk

Mir fällt nur die Lösung ein, dass du über Zeilen (ggf. Spalten) iterierst und solange die Zellen abgrast, bis kein Wert mehr enthalten ist (undef => if (defined($oCell->{Val})), nicht ''!); dann hast du die Grenze gefunden.

Würg, wie unschön:

for (my $iR = $oWkS->{MinRow};
   defined $oWkS->{MaxRow} && $iR <= $oWkS->{MaxRow};
   $iR++) {
   for(my $iC = $oWkS->{MinCol} ;
      defined $oWkS->{MaxCol} && $iC <= $oWkS->{MaxCol} ; $iC++) {
      ## mach was mit [$iR, $iC]...
   }
}

ich sollte mir erst die Doku ansehen, bevor ich was schreib... sorry.

Viele Grüsse

Philipp