Диапазон копирования VBA из другого листа

Question

Попытка скопировать последние 3 ячейки диапазона А, а затем вставить их в новый лист под названием Отчет. Продолжайте получать ошибку компиляции: неверная или неквалифицированная ссылка. Я знаю, что код вставки работает, но мой код копирования не работает. Это потому, что .Cells требует его в С l oop? Если так, я не могу понять, как это исправить. Это код вопроса:

Sheets("DATA").Activate

With Sheets("DATA")
    ' Use this lRow now since the previous ones require you to be in a With loop
    Range(.Cells(lRow - 2, 2), .Cells(lRow, 2)).Copy
End With

With Sheets("Report")
    .Activate
    ' Pastes the last 3 cells of Column A into the Month column
    .Range("B13").PasteSpecial Paste:=xlPasteAll
    .Range("B12").Formula = "Month"
    .Range("C12").Formula = "Production Cost"
    'Calculates the production cost and places it in the correct column

    .Range("D12").Formula = "Inventory Cost"
    .Range("E12").Formula = "Total Cost"
    .Range("B16").Formula = "Total"
 End With

Answer 1

ваш код Range(.Cells(lRow - 2, 2), .Cells(lRow, 2)).Copy не входит в оператор [With], поэтому ссылка [.Cells] будет недействительной.