如何在 LibreOffice Basic 中获取单元格颜色？

Question

我想使用 LibreOffice Basic 宏计算选择中黄色、橙色、绿色和红色的出现次数。我去过this Stackoverflow question，但它对我不起作用。

代码如下：

Sub Main
    dim selection,cell as Object
    dim i,j as integer
    selection = ThisComponent.getCurrentController().getSelection()

    for i=selection.RangeAddress.StartRow to selection.RangeAddress.EndRow
        for j=selection.RangeAddress.StartColumn to Selection.RangeAddress.EndColumn
            cell = ThisComponent.Sheets(0).getCellByPosition(i,j)
            print cell.CellBackColor
            rem TODO: Count colors
        next
    next
End Sub

它说-1，除非单元格颜色为黑色，然后它说0。我做错了什么？

Answer 1

我在getCellByPosition(i,j) 中切换了i 和j。实际上应该是getCellByPosition(j,i)。