Các nút tùy chọn VBA trong Excel
Nếu bạn có nhiều nút tùy chọn, bạn chỉ có thể chọn một trong các nút tùy chọn. Để tạo các nút tùy chọn trong Excel VBA, hãy thực hiện các bước sau.
-
Trên tab Nhà phát triển, nhấp vào Chèn.
-
Trong nhóm Điều khiển ActiveX, nhấp vào Nút tùy chọn.
-
Kéo hai nút tùy chọn trên trang tính của bạn.
-
Nhấp chuột phải vào nút tùy chọn đầu tiên (đảm bảo Chế độ thiết kế được chọn).
-
Nhấp vào Xem mã.
Lưu ý: bạn có thể thay đổi chú thích và tên của điều khiển bằng cách nhấp chuột phải vào điều khiển (đảm bảo Chế độ thiết kế được chọn) và sau đó nhấp vào Thuộc tính. Thay đổi chú thích của các nút tùy chọn thành Nữ và Nam. Hiện tại, chúng ta sẽ để OptionButton1 và OptionButton2 làm tên của các nút tùy chọn.
-
Thêm dòng mã sau:
If OptionButton1.Value = True Then Range("D3").Value = 10
-
Nhấp chuột phải vào nút tùy chọn thứ hai (đảm bảo Chế độ thiết kế được chọn).
-
Nhấp vào Xem mã.
-
Thêm dòng mã sau:
If OptionButton2.Value = True Then Range("D3").Value = 20
-
Nhấp vào các nút tùy chọn trên trang tính (đảm bảo Chế độ thiết kế được bỏ chọn).
Kết quả:
Mặc dù trong một số trường hợp, có thể hữu ích khi đặt trực tiếp các nút tùy chọn trên trang tính của bạn, các nút tùy chọn đặc biệt hữu ích khi được đặt trên Biểu mẫu người dùng.