Cách bật con lăn chuột cho ListBox, ComboBox, Frame trong VBA

Bạn đang viết macro VBA trong Excel, Access, Word hoặc PowerPoint và thấy ListBox / ComboBox / Frame cuộn bằng phím nhưng không cuộn được bằng con lăn chuột? Đó không phải lỗi phần mềm — đó là giới hạn của VBA từ xưa đến nay.

MouseWheel for VBA của SonVuDev giải quyết vấn đề này chỉ với 1 file .bas và 2 dòng code. Không cần thư viện MSForms, chạy trên mọi host VBA, hỗ trợ cả Office 64-bit và 32-bit.

Tại sao VBA không cuộn được bằng con lăn chuột?

VBA không phải là .NET hay WinForms — nó là ngôn ngữ lập trình cũ, được tích hợp sâu vào Office. Các control như ListBox, ComboBox, Frame không có sẵn message loop để bắt sự kiện WM_MOUSEWHEEL. Khi bạn cuộn chuột, Windows gửi message đó đến cửa sổ cha (UserForm), nhưng VBA không chuyển tiếp xuống control con.

Hậu quả: bạn phải kéo thanh cuộn bằng tay, hoặc dùng phím mũi tên — rất bất tiện khi danh sách dài.

Cách bật con lăn chuột trong VBA

1. Tải về MouseWheel.bas từ SonVuDev.
2. Import file .bas vào project VBA (Alt+F11 → File → Import File).
3. Trong event UserForm_Initialize, thêm 2 dòng:
   Call MouseWheelEnable(Me)
Call MouseWheelConfigure(Me, 3, True)
4. Chạy form — con lăn chuột đã hoạt động.

Tính năng nổi bật

• Không phụ thuộc MSForms: Control type được phát hiện bằng duck typing, không cần thêm reference.
• Hỗ trợ mọi host VBA: Excel, Access, Word, PowerPoint, VB6.
• Hỗ trợ 64-bit và 32-bit: VBA7 (Office 64-bit) và VBA6 (Office 32-bit) đều chạy.
• Tốc độ cuộn chỉnh được: Dùng MouseWheelConfigure để đặt số dòng cuộn mỗi lần lăn.
• Tự phục hồi: Nếu hook cài thất bại, công cụ tự thử lại — không bị kẹt trạng thái.
• Gỡ hook an toàn: Khi rời control hoặc đóng form, hook được gỡ sạch.
• Chẩn đoán tùy chọn: Bật EnableDebug hoặc MWLog để xem log hoạt động.
• Báo cáo khả năng nền tảng: IsWheelSupported và PlatformName cho biết hệ hiện tại có hỗ trợ hay không.

Khi nào nên dùng?

• Form VBA có ListBox/ComboBox chứa hàng trăm dòng.
• Người dùng cuối quen dùng con lăn chuột, không muốn dùng thanh cuộn.
• Bạn muốn cải thiện UX của tool nội bộ mà không cần rewrite sang .NET.

Kết luận

MouseWheel for VBA là giải pháp nhỏ gọn, không phụ thuộc, dễ tích hợp. Nếu bạn đang viết VBA và muốn form của mình cuộn được bằng chuột, đây là công cụ phù hợp.