Tạo nút bấm chọn cột dữ liệu trong Excel

Nếu là người hay phải thao tác với các cột dữ liệu trong bảng tính Excel , bạn có thể tạo những nút bấm để thuận tiện trong công việc .

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