Excel копия х количество столбцов ниже одной ячейки

Question

Я имею дело с изменяющимся файлом, и я хотел бы скопировать последние 10 строк определенного столбца, а затем вставить его в другой лист, исходный лист обновляется в течение дня.

Answer 1

Const COLUMN_INDEX = 1 ' Desired column

Sub CopyValues()
    Dim LastRow = [A65536].End(xlUp).Row ' Find the last row index
    Dim I
    For I = LastRow - 10 To LastRow
        'Do something with Cells(I, COLUMN_INDEX).Value
    Next I
End Sub