Question

我在Excel中有一列数字，例如：

我需要从第二（20-10）三分之一（25-15）中扣除第一行，依此类推。我找到了一些使用MOD的例子，但不幸的是，我无法以正确的方式应用它。

Answer 1

没有经过多少测试，但应该可以使用！

它循环遍历第一列，从单元格A1开始到A2，A3等，并且每两行汇总一次。结果存储在右侧（右侧5列，您看到）

Sub Test()
' Select cell A1, *first line of data*.
Range("A1").Select

right_offset = 5

Do Until IsEmpty(ActiveCell)

    Set r1 = Selection
    Set r2 = ActiveCell.offset(1, 0)

    ActiveCell.offset(1, right_offset).Select

    ActiveCell.Value = r2.Value - r1.Value

    ActiveCell.offset(-1, -right_offset).Select

    ' Step down 2 row from present location.
    ActiveCell.offset(2, 0).Select

Loop
End Sub

编辑：为了运行它，您只需打开VBA编辑器（Alt + F11），将代码复制粘贴到那里，然后按F5查看它是否适用于您的情况！

希望这有帮助！

Answer 2

假设带有数字的列是A，请在单元格B2上尝试：

function

Answer 3

假设您的数据位于D3:D80。

Range("E4").Formula = "=D4-D3"
Range("E3:E4").AutoFill Destination:=Range("E3:E80")

Excel从每秒扣除每个第一个数字

3 个答案: