如何使用VBA在Excel中选择标题/第一行以外的整个列

Question

我正在尝试选择第一行以外的整个列。 我使用了从https://www.extendoffice.com/documents/excel/1628-excel-select-column-except-header-first-row.html获得的以下代码

Sub SelectColumn()
Dim xColIndex As Integer
Dim xRowIndex As Integer
xColIndex = Application.ActiveCell.Column
xRowIndex = Application.ActiveSheet.Cells(Rows.Count, xColIndex).End(xlUp).Row
Range(Cells(2, xColIndex), Cells(xRowIndex, xColIndex)).Select
End Sub

但是RowIndex变量读取的值为1。因此，该部分从Row2到Row1，而不是从Row2到最后一行。 我该如何纠正

Answer 1

如果您确实需要选择整个列（为什么？），则此操作。 在您的示例中，相关列中没有任何数据。

Range(Cells(2, xColIndex), Cells(rows.count, xColIndex)).Select