需要复制具有多列的范围，直到最后一次使用的行

Question

您好，我正在寻找一些代码，从 A2 单元格到AD列选择范围，然后向下直到最后一次使用的行

Answer 1

您可以使用以下代码。

Sub my_code()

    lastrow = Range("A10000").End(xlUp).Row
    Range(Cells(2, 1), Cells(lastrow, 30)).Select

End Sub