在Excel表格中select多列的代码

我是Excel VBA的新手。 我需要对代码进行修改，以便能够继续下一步。

我想在Excel表格中select多个表格列。 这是我的代码：

Dim ws As Worksheet Dim tbl As ListObject Set ws = Sheets("Sheet1") Set tbl = ws.ListObjects(1) Range("tbl[[Column1]:[Column5]]").Select 

当我把表名，它的作品。 但我想使用我在代码中使用的variables来select表列。

Answer 1

欢迎来到Stackoverflow！

有很多方法可以做到这一点：

你可以使用：

 Range("A:E").Select ' example selects columns from A to E 

否则，你也可以通过使用一个数组的例子：

 Sub test() Dim x, y As Range, z As Integer x = Array(1, 5) Set y = Columns(x(0)) For z = 1 To UBound(x) Set y = Union(y, Columns(x(z))) Next z y.Select End Sub 

但这取决于你需要什么

最好的祝福

丹尼尔

Answer 2

您可以使用连接来使用variables作为表名。

这里是代码：

 Dim ws As Worksheet Dim tbl As ListObject Set ws = Sheets("Sheet1") Set tbl = ws.ListObjects(1) Range(tbl & "[[Column1]:[Column5]]").Select