如何将 Lotus 范围值放入数组

Question

Lotus 123 中是否有快速方法将范围内的所有单元格值放入数组中。我正在寻找类似于 Excel VBA 的东西，速度非常快。

Dim arrValues() As Variant
arrValues = rg.Value

生成的数组也可以被操作并放回sheet；就我而言，我想将其放入 Excel。基本上取代了复制和粘贴。在内存中操作数组比一次操作一个单元格快得多。

我知道如何通过一次读取一个单元格来做到这一点，但我正在寻找一种类似于 Excel 的更快方法。

'Lotus Script
Dim r As Range
Set r = CurrentDocument.Ranges("A:A1..A:D4")
Dim x, y As Integer
For x = 0 To 3
    For y = 0 To 3
        Print (r.Cell(x, y).cellvalue)
    Next
Next

请注意，我特别没有使用 VBA 进行标记，因为这只能由了解 Lotus Script 的人回答。这与 VBA.

无关

如何将 Lotus 123 范围值放入数组？

Answer 1

在帮助文件中找到：Range.GetCellData 方法。

获取范围内的数据，引用为指向单个单元格内容的一组指针。此方法分配内存用于复制范围的内容，设置内存中的值，以及 returns 一个可以被外部 C 程序使用的数组指针。

语法

arraypointer = range.GetCellData(celldatatype)

参数细胞数据类型

变体（CellDataType 枚举）。返回的单元格数据的格式。下面的 table 列出了此参数的允许值。

值和说明

$CellValue Return 指向字符串数组的指针。字符串包含单元格评估的格式化值。空白单元格导致 NULL 指针。
$FormulaContents Return 指向字符串数组的指针。这类似于 $CellValue，除了字符串是公式单元格的内容（例如，“+A1+@SUM(B1)”）。所有其他类型的单元格都会导致 NULL 指针。
$Double Return 指向双精度数组的指针。空白单元格和标签返回为零。 NA 和 ERR 被编码为无效数字。

Return 值：

长。指向指针数组的指针，范围内的每个单元格对应一个指针。该数组按 row/column/sheet 排序。例如，表示范围 [A:A1..B:B2] 的数组将按 A:A1、A:A2、A:B1、[=61= 的顺序给出], B:A1, B:A2, B:B1, B:B2。

用法

此方法在内部为返回的数组分配内存，调用者必须释放该内存。

如何将 Lotus 范围值放入数组

How to get Lotus range values into array

lotusscript