Calc: Anzahl Felder eines Arrays
Verfasst: Mo, 10.10.2011 16:54
Liebe Leute,
ich brauche noch mal eine kleine Hilfestellung. Ich versuche die Anzahl der Zeilen und Spalten eines zweidimensionalen Arrays heraus zu bekommen, um die Anzahl der Felder des übergebenen Bereiches zu bestimmen, erhalte in der zweiten Printanweisung des nachfolgenden Codes aber jedes mal eine Fehlermeldung. "Index außerhalb des definierten Bereiches". Kann mir jemand einen Tipp geben?
Danke, Gruß Markus
ich brauche noch mal eine kleine Hilfestellung. Ich versuche die Anzahl der Zeilen und Spalten eines zweidimensionalen Arrays heraus zu bekommen, um die Anzahl der Felder des übergebenen Bereiches zu bestimmen, erhalte in der zweiten Printanweisung des nachfolgenden Codes aber jedes mal eine Fehlermeldung. "Index außerhalb des definierten Bereiches". Kann mir jemand einen Tipp geben?
Code: Alles auswählen
Sub Test
ArrayDimension("M1", "A1:C3")
End Sub
Sub ArrayDimension (strSheetName As String, strBereich As String)
Dim oDoc As Object
Dim oBereich As Object
Dim aDat As Variant
oDoc = ThisComponent
oBereich = oDoc.Sheets(strSheetName).getCellRangeByName(strBereich)
aDat = oBereich.getDataArray()
Print "Anzahl Zeilen:= " + UBound(aDat,1)
Print "Anzahl Spalten:= " + UBound(aDat,2)
End Sub