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