Hướng dẫn tạo checkbox trong Excel

LI�N HỆ QUẢNG C�O TẠI Đ�Y : 0988 123 126

2.Hướng dẫn tạo Checkbox

Trong Developer, có rất nhiều tính năng hữu ích để phục vụ cho những yêu cầu nâng cao, trong đó có việc chèn checkbox vào Excel. Tuy nhiên, không phải máy nào cũng có sẵn thẻ Developer trên thanh công cụ như Home, Insert, Layout…, vì vậy để hiển thị Developer, bạn thực hiện như sau.

Bước 1: Các bạn hãy ấn chuột phải vào thanh Ribbon rồi chọn Customize the Ribbon

Sau đó, sẽ xuất hiện thì hộp thoại Excel Options. Các bạn nhìn ngay qua bên phải sẽ thấy ô Developer chưa được chọn, các bạn ấn chọn ô đó rồi ấn OK.

Lúc này, các bạn sẽ thấy thẻ Developer đã nằm trên thanh công cụ.

Bước 2: Để chèn một ô checkbox trong Excel, tại thẻ Developer các bạn chọn Insert rồi chọn Check Box (Form Control).

Các bạn có thể giữ chuột trái, cho đến khi xuất hiện dấu mũi tên ở 4 hướng, các bạn kéo để điều chỉnh kích thước ô checkbox. Mặc định khi vừa được tạo, thì bên phải ô checkbox sẽ kèm tên bên phải, để xóa các bạn nhấn chuột phải vào ô checkbox đã tạo được, rồi chọn Edit Text trong menu hiển thị. Sau đó bạn chỉ cần xóa chữ hiển thị trong checkbox đi là được

Bước 3: Cuối cùng, click chuột tại ô checkbox đầu tiên rồi kéo xuống những ô còn lại là được.

Như vậy, chúng ta đã hoàn thành tạo hộp Checkbox như hình, tùy nội dung công việc của bạn, mà bạn tick chọn hoặc không tick.

II.Tạo hộp Checkbox hàng loạt trong Excel bằng VBA.

Nếu dữ liệu của các bạn rất nhiều, bạn cần tạo nhiều dấu Checkbox ,thì với việc tạo dấu Checkbox hàng loạt bằng VBA là một cách làm lý tưởng, chỉ với thao tác đơn giản, bạn đã tạo được dấu Checkbox hàng loạt một cách nhanh nhất.

Bước 1: Trước hết, bạn cần bôi đen vùng dữ liệu cần chèn ô checkbox để khoanh vùng lại.

Sau đó, cũng nhấn vào tab Developer rồi nhấn tiếp vào Visual Basic ở bên dưới.

Bước 2: Xuất hiện hộp thoại như hình, chúng ta nhấn vào Insert rồi chọn Module.

Lúc này, các bạn hãy copy nội dung Code VBA ở phía dưới và dán vào như hình bên dưới

Sub InsertCheckBoxes()
‘Update 20140506
Dim Rng As Range
Dim WorkRng As Range
Dim Ws As Worksheet
On Error Resume Next
xTitleId = “KutoolsforExcel”
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox(“Range”, xTitleId, WorkRng.Address, Type:=8)
Set Ws = Application.ActiveSheet
Application.ScreenUpdating = False
For Each Rng In WorkRng
With Ws.CheckBoxes.Add(Rng.Left, Rng.Top, Rng.Width, Rng.Height)
.Characters.Text = Rng.Value
End With
Next
WorkRng.ClearContents
WorkRng.Select
Application.ScreenUpdating = True
End Sub

Sau đó, các bạn nhấn nút Run(màu xanh) để thực hiện lệnh.

Và kết quả, sau khi chạy là tất cả các ô được chọn đã có dấu Checkbox như hình bên dưới.

Như vậy, chúng ta đã hoàn thành xong 2 cách chọn hộp Checkbox rất nhanh chóng và đơn giản phải không các bạn.Các bạn hãy thử thực hành để nhớ và áp dụng trong công việc nhé, chúc các bạn thành công.

Tham khảo thêm các bài viết.

–Các thủ thuật trong Excel-phần 2

–Xóa dữ liệu trùng nhau trong excel

–Cách sử dụng hàm đếm trong excel