vba - excel:使用表格列的范围

Question

有没有办法使用UsedRange从表中选择第一列到最后一列？

原代码如下:

Worksheets("Sheet1").UsedRange.Columns("E").Cells

但是它从 Excel 的第一行到最后一个最大值，我不想要这个。所以我尝试做这样的事情:

Dim LastRow As Integer
    Dim ws As Worksheet

Set ws = Worksheets("Sheet1")
  LastRow = ws.Cells(Rows.Count, 1).End(xlUp).Row  

With ws.UsedRange.Columns("E2:E & LastRow").Cells

虽然这在这里似乎不起作用，所以我怀疑是否有正确的方法来做到这一点，或者UsedRange它不是最好的。

此外，在此之后我想使用THIS Jeeped提供的代码，但我需要先知道是否可以解决这个问题。

Answer 1

您可以直接使用范围，

with ws
    with .range(.cells(1, "E"), .cells(.rows.count, "E").end(xlup))
        'do something with the cells in column E
    end with
end with

您可以将 .UsedRange 与 Intersect 一起使用

with Intersect(ws.UsedRange, ws.columns("E"))
    'do something with the cells in column E
end with