将大规模的值分配到数据库中。公式(libreOffice calc)
Assign values in large scale into a data base. Formula (libreOffice calc)
我正在尝试在 libreOffice spreed-sheet 应用程序中创建一个数据库。我需要的是,第一列是 ID,但每个 ID 必须填充 100 个单元格。所以我想要 2000 个 ID,每个 ID 占用 100 个单元格,我们有 200 000 个单元格。 (Id 的值 = 范围 (1,2000))
row#1 : row#100 = Id#1 // row#101 : row#200 = Id#2 ....// row#199900 : row#200000 = Id#2000
我只想将值 1
分配给第一列中的前 100 个单元格,将值 2
分配给同一列中接下来的 100 个单元格,依此类推,直到我在第一列中有 2000 个 ID。
所以我想找到一个公式来实现这一点,而不必 select 并手动滚动 sheet 2000 次。
谢谢
如果ID在A列:
=QUOTIENT(ROW(A1);100)+1
公式将行数除以 100 的整数部分加 1。
循环应用?
Public Sub test()
Dim i As Long
For i = 1 To 2000
Range("A1:A100").Offset((i - 1) * 100, 0) = i
Next
End Sub
我正在尝试在 libreOffice spreed-sheet 应用程序中创建一个数据库。我需要的是,第一列是 ID,但每个 ID 必须填充 100 个单元格。所以我想要 2000 个 ID,每个 ID 占用 100 个单元格,我们有 200 000 个单元格。 (Id 的值 = 范围 (1,2000))
row#1 : row#100 = Id#1 // row#101 : row#200 = Id#2 ....// row#199900 : row#200000 = Id#2000
我只想将值 1
分配给第一列中的前 100 个单元格,将值 2
分配给同一列中接下来的 100 个单元格,依此类推,直到我在第一列中有 2000 个 ID。
所以我想找到一个公式来实现这一点,而不必 select 并手动滚动 sheet 2000 次。
谢谢
如果ID在A列:
=QUOTIENT(ROW(A1);100)+1
公式将行数除以 100 的整数部分加 1。
循环应用?
Public Sub test()
Dim i As Long
For i = 1 To 2000
Range("A1:A100").Offset((i - 1) * 100, 0) = i
Next
End Sub