Блог

Мне нужен некоторый код vba для вычитания между последней ячейкой из столбца B и последней ячейкой из столбца D и поместить результат в ячейку N1. Позиция последней ячейки в обоих столбцах может отличаться.

Спасибо

Этот код сделает все за вас. Он берет последнюю ячейку обоих столбцов B D и вычитает их значение из N1 cell :

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

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