OpenOffice比较两个单元格字符串

Question

所以我正在使用Basic中的一个宏，而我现在需要比较两列重复项。

这是我到目前为止所做的事情：

for i = 0 To 5
   Cell1 = Sheet.getCellByPosition(0,i)

   for j = 0 to 5
   Cell2 = Sheet.getCellByPosition(1,j)

   rem COMPARISON WOULD HAPPEN HERE

   Next j
Next i

我想做的事情是：如果Cell1.String == Cell2.String那么......

这是我写宏的第一次尝试，所以我非常感谢任何帮助和/或指导。

谢谢！

另外，如果有人知道除了wiki以外的其他很好的tutorials.documentation，我会非常感谢链接

Answer 1

您应该将第一列的所有值存储到一个数组中，然后使用简单的递归将第二列的每个值与数组的所有条目进行比较。

可能有效的代码是

Dim firstcolumn(5) As String

For i = 0 to 5
   firstcolumn(i) = Sheet.getCellByPosition(0,i)
Next i

For j = 0 to 5
   Cell2 = Sheet.getCellByPosition(1,j)
   for i = 0 to 5
    if Cell2 = firstcolumn(i) then
        MsgBox("The value of the cell " + i + " in the first column is the same with the value of the cell " + j + " of the second column")
    Next i   
Next j

查找代码示例的最佳位置是openoffice论坛https://forum.openoffice.org/en/forum/

我希望以上内容能为您提供帮助。