Excel复制x单元格下方的列数

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