如何在EXCEL中的不同（非相邻）列中选择最后三行

Question

Sheets("AVG-BW").Range("E" & Rows.Count).End(xlUp).Offset(-2, -4).Resize(3, 3).Copy Sheets("Data").Range("A28")

我需要从E，D和A列自动选择最后3个值。我使用上面给出的代码，但选择C，B和A.帮助我。

Answer 1

你可以试试这样的......

Dim sws As Worksheet, dws As Worksheet
Dim lr As Long
Dim rng As Range

Set sws = Sheets("AVG-BW")
Set dws = Sheets("Data")

lr = sws.Cells(Rows.Count, "E").End(xlUp).Row

Set rng = Union(sws.Range("E" & lr).Offset(-2, -4).Resize(3), sws.Range("E" & lr).Offset(-2, -1).Resize(3), sws.Range("E" & lr).Offset(-2).Resize(3))
rng.Copy dws.Range("A28")