OpenOffice.info

Verfasst: **So, 28.11.2010 18:44**

Hallo Ihr Lieben,
der Aufruf

   n=inSheet.Rows.count

gibt das Ergebnis 65536. Das ist, glaube ich die maximale Zeilenzahl in Calc. Ich möchte aber nur die Zeilen "mit Inhalt" zählen. Was mache ich falsch?
Grüße von
Pit

Verfasst: **Mo, 29.11.2010 09:37**

Du musst erst den Bereich auswählen/markieren, dessen Anzahl du haben möchtest.
z.B. so:

Code: Alles auswählen

Sub Main
    ' Startposition fuer CellRangeByPosition festlegen
    CRBP_L = 0 ' CellRangeByPosition Links		Spalte A
    CRBP_O = 0 ' CellRangeByPosition Oben		Zeile 1

    oSheet = thisComponent.sheets(0)

    oCellCursor = oSheet.createCursor()
    oCellCursor.GotoEndOfUsedArea(True) ' markieren gesammten Bereich
    CRBP_R = oCellCursor.getRangeAddress.EndColumn 
    CRBP_U = oCellCursor.getRangeAddress.EndRow
    oSrcRange = oSheet.getCellRangeByPosition(CRBP_L,CRBP_O, CRBP_R, CRBP_U)

    AnzahlZeilen = oSrcRange.Rows.count
    AnzahlSpalten = oSrcRange.Columns.count
   
    msgbox " Zeilen: " & AnzahlZeilen & "  Spalten: " & AnzahlSpalten
End Sub

Verfasst: **Di, 30.11.2010 21:15**

Liebe/r Koala,
vielen Dank!
Ich habe das jetzt allerdings noch gekürzt auf:

Code: Alles auswählen

   oCellCursor = inSheet.createCursor()
   oCellCursor.GotoEndOfUsedArea(True)
   inEndZeile = oCellCursor.getRangeAddress.EndRow

So long Pit

OpenOffice.info

Zeilen zählen

Zeilen zählen

Re: Zeilen zählen

Re: Zeilen zählen