How To Select Entire Column Except Header/First Row In Excel using VBA

Question

I am trying to make a selection of an entire column except the first row. I used the following code which i got from 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

but the RowIndex variable reads to the value 1. So the section happens from Row2 to Row1 instead of Row2 to the Last row. How can i get this corrected

Refer this

Dy.Lee
– Dy.Lee

2018-01-19 15:40:36 +00:00
Commented Jan 19, 2018 at 15:40 — Dy.Lee
– Dy.Lee, Commented Jan 19, 2018 at 15:40

SJR · Accepted Answer · 2018-01-19 15:16:59Z

1

If you really need to select the whole column (why?) then this. In your example you can't have any data in the relevant column.

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

answered Jan 19, 2018 at 15:16

SJR

23.1k6 gold badges21 silver badges26 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

SJR Over a year ago

My pleasure.You might want to get into the habit of accepting answers so as to engender good will.

Collectives™ on Stack Overflow

How To Select Entire Column Except Header/First Row In Excel using VBA

1 Answer 1

1 Comment

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Linked

Related