Trong bài này chúng ta sẽ giải bài tập cách viết thủ công thêm một sự kiện click vào button trong VBA. Qua bài tập này sẽ giúp bạn hiểu hơn về cách thêm một sự kiện bất kì.
Trước khi giải bài này thì chắc chắn rằng bạn đã đọc qua phần lý thuyết ở các bài sau:
Đề bài: Cho một Command Button, hãy thêm sự kiện click vào button đó bằng thủ công (không click đúp chuột vào button để VBA tự tạo).
Các bước thực hiện:
Bài viết được đăng tại freetuts.net
1. Tạo tab Developer bạn hãy click Insert -> Comand Button
2. Click vào vị trí bạn muốn đặt Button trong Excel.
3. Click chuột phải và chọn Properties.
4. Một hộp thoại xuất hiện, bạn hãy đổi tên của button thành MsgButton.
5. Mở Visual Basic Editor, mở Sheet mà bạn đã đặt button. Như trong hình dưới đây là mình ở Sheet1.
6. Bạn cần chú ý hai thông tin.
- Tên của button mình đã đặt thành MsgButton
- Sự kiện muốn viết là Click
Vậy tên của sub sẽ có dạng {Name}_{Event}:
Private Sub MsgButton_Click()
End Sub
7. Thêm hộp thoại thông báo để test nhé.
Private Sub MsgButton_Click()
MsgBox "Welcome to Freetuts"
End Sub8. Ra giao diện Excel và click vào button để xem kết quả nhé.
Mục đích bài này là mình muốn bạn hiểu về cách thêm sự kiện cho một đối tượng trong VBA thôi nhé, để từ đó bạn có đổi tên của đối tượng thì biết cách vào đổi ten cho các sự kiện.
Có một số sự kiện có thể có tham số truyền vào, vì vậy bạn cần xem kỹ tài liệu của nó trên trang chủ của Microsoft nhé.
Bình luận đã đóng, nếu có thắc mắc hãy đặt câu hỏi tại hoicode.com để admin trả lời.
Nguồn: freetuts.net
