将一列的最后一个单元格与另一列的最后一个单元格相减，然后将结果放入特定的单元格中

Question

我需要一些vba代码在B列的最后一个单元格和D列的最后一个单元格之间减去并将结果放入单元格N1中。两列中最后一个单元格的位置可能会发生变化。

Thx

Answer 1

此代码为您解决了问题。它使用列B和D的最后一个单元格，并在N1 cell上减去它们的值：

Sub MySub()
    Dim lastBRow As Long
    Dim lastDRow As Long

    lastBRow = Range("B" & Rows.count).End(xlUp).Row
    lastDRow = Range("D" & Rows.count).End(xlUp).Row
    Range("N1").Value = Range("B" & lastBRow).Value - Range("D" & lastDRow).Value
End Sub