Ví dụ bạn có bảng dữ liệu như hình dưới
Bạn tạo một Macro theo cách như sau , bấm tổ hợp phím Alt_F11 > Insert > Module
Dán nội dung Macro như bên dưới
Sub SelectColumnData()
Dim ac As Range
Dim cr As Range
Dim col As Integer
Set ac = ActiveCell
Set cr = ac.CurrentRegion
col = ac.Column - cr.Column
If cr.Rows.Count > 1 Then
cr.Offset(1, col).Resize(cr.Rows.Count - 1, 1).Select
End If
End Sub
Quay trở lại Excel để tạo nút bấm như sau
Chọn tab Developer > Insert > Button
Chọn vị trí và tạo nút bấm , gán nút này với Macro có tên là SelectColumnData
Bấm chuột phải vào nút bấm và chọn Exit Edit Text sau đó sửa thành tên phù hợp trong nút bấm , ví dụ : Chọn cột dữ liệu
Để làm việc bạn chỉ cần bấm chọn cột dữ liệu sau đó bấm nút Chọn cột dữ liệu