VBA列之间的数值差异

Question

I have an excel file with 15000 rows of data. I have numerical values in Columns D & E . I have to calculate the difference between D & E and store it in F using VBA. I am new to VBA Help is appreciated.

Answer 1

Is it absolutely necessary that you use VBA for this ? If I understand the question correctly this would be much easier to do with excel formulas rather than using an array and having to loop through.

In cell F1 you need to type the following formula: = D1-E1

Be sure to include the equals sign. Then press enter. Double click the bottom right corner of cell in F1 and it should auto fill all the way down.

Hope this helps. This is my first post so hopefully I haven't done anything wrong !

Answer 2

For data between rows 2 and 15000, run:

Sub SplitTheDifference()
    Range("F2:F15000").Formula = "=D2-E2"
End Sub

The formulas adjust as we move down the columns

If we need values rather than formulas in column F , use:

Sub SplitTheDifference()
    With Range("F2:F15000")
        .Formula = "=D2-E2"
        .Value = .Value
    End With
End Sub