Để tăng tính tương tác cho bảng tính Excel có sử dụng VBA của bạn, cụ thể trong trường hợp bạn muốn đưa ra một thông báo, một lưu ý cho người dùng, chúng ta dùng MsgBox trong Excel VBA.
Một MsgBox trong Excel VBA có thể được tạo ra trong trình soạn thảo code VBA của Excel như sau:
Chạy đoạn code trên trong Excel VBA, chúng ta sẽ nhật được kết quả như sau:
Mặc định thì tiêu đề (tham số title sẽ được nói tới trong đoạn dưới) của hộp thoại MsgBox trong Excel sẽ có chữ “Microsoft Excel”. Chúng ta có thể thay đổi tiêu đề này bằng cách sửa đoạn code trên như sau:
Ở phần trước, nếu các bạn chỉ sử dụng MsgBox trong Excel VBA như một hộp thoại thông báo, thì mình tin là đã đủ những gì “cần thiết phải có ở mức tối thiểu” rồi, trong phần này, chúng ta sẽ đề cập đến những đoạn code sẽ giúp chúng ta điều chỉnh được MsgBox theo ý muốn.
Trong VBA, khi bạn bắt đầu viết “MsgBox ” trong 1 Sub, thì trình soạn thảo VBA sẽ gợi ý cho bạn những tham số mà MsgBox nhận như sau:
Các bạn để ý, ở đây prompt, buttons, title, helpfile, context là những tham số của MsgBox, những tham số không ở trong dấu ngoặc vuông là những tham số bắt buộc (prompt); những tham số ở trong dấu ngoặc vuông (buttons, title, helpfile, context) là những tham số không bắt buộc.
Trong phần cơ bản của bài viết, bạn đã làm quen với tham số prompt và title của MsgBox, trong phần này, chúng ta sẽ đi tìm hiểu các tham số tiếp theo là tham số Buttons.
Tham số helpfile và context rất hiếm khi chúng ta phải sử dụng tới, nên sẽ được trình bày ở một bài viết chuyên sâu khác.
Phần “As VbMsgBoxResult” là giá trị trả về của hàm MsgBox khi người dùng bấm nút trên hộp thoại MsgBox.
Tham số Buttons của MsgBox nhận những giá trị sau đây
Giá trị | Nhóm | Kiểu | Miêu tả |
---|---|---|---|
vbOKOnly | 1 | Buttons | Ok button. |
vbOKCancel | 1 | Buttons | Ok and cancel buttons. |
vbAbortRetryIgnore | 1 | Buttons | Abort, Retry and Ignore buttons. |
vbYesNoCancel | 1 | Buttons | Yes, No and Cancel buttons. |
vbYesNo | 1 | Buttons | Yes and No buttons. |
vbRetryCancel | 1 | Buttons | Retry and Cancel buttons. |
vbCritical | 2 | Icon | Critical Message icon. |
vbQuestion | 2 | Icon | Warning Query icon. |
vbExclamation | 2 | Icon | Warning Message icon. |
vbInformation | 2 | Icon | Information Message icon. |
vbDefaultButton1 | 3 | Default button | Set button 1 to be selected. |
vbDefaultButton2 | 3 | Default button | Set button 2 to be selected. |
vbDefaultButton3 | 3 | Default button | Set button 3 to be selected. |
vbDefaultButton4 | 3 | Default button | Set button 4 to be selected. Note that there will only be four buttons if the help button is included with vbAbortRetryIgnore or vbYesNoCancel. |
vbApplicationModal | 4 | Modal | Cannot access Excel while the button is displayed. Msgbox is only displayed when Excel is the active application. |
vbSystemModal | 4 | Modal | Same as vbApplicationModal but the message box is displayed in front of all applications. |
vbMsgBoxHelpButton | 5 | Other | Adds a help button |
vbMsgBoxSetForeground | 5 | Other | Sets the message box windows to be the foreground window |
vbMsgBoxRight | 5 | Other | Right aligns the text. |
vbMsgBoxRtlReading | 5 | Other | Specifies text should appear as right-to-left reading on Hebrew and Arabic systems. |
Phần bảng trên mình chủ động không dịch mà để nguyên như theo nguồn từ Microsoft
Tham số Buttons được chia ra làm nhiều nhóm khác nhau:
Ví dụ sử dụng tham số Buttons trong MsgBox: bạn có thể kết hợp nhiều giá trị của tham số này bằng dấu + giữa các giá trị như sau (dấu _ để nối code dòng trên và dòng dưới trong VBA giúp chúng ta dễ theo dõi các dòng code bị dài quá). Với mỗi nhóm, chúng ta chỉ được lấy ra 1 giá trị.
Kết quả chúng ta nhận được một MsgBox có nút OK, nút Cancel, biểu tượng màu đỏ, nút OK được chọn sẵn (để bấm Enter trên bàn phím cho nhanh), và MsgBox này chỉ hiển thị khi chương trình Excel đang được chọn (Như bạn thấy trong hình, cửa sổ File Explorer đè lên phía bên phải của hộp thoại MsgBox)
Nếu bây giờ chúng ta sửa lại đoạn code phía trên một chút như sau:
Đoạn code số 3 chỉ khác đoạn code số 2 ở chỗ, thay vì dùng vbApplicationModal, thì chúng ta dùng vbSystemModal, và đây là kết quả:
Sự khác nhau ở đây là, MsgBox này sẽ ở trên toàn bộ các cửa sổ khác và phía góc trên bên trái của hộp thoại MsgBox, biểu tượng cũng khác với hộp thoại MsgBox ở ví dụ trước.
Khi hộp thoại MsgBox hiện ra để người dùng tương tác, bạn muốn biết người dùng đã bấm vào lựa chọn nào, bạn có thể sử dụng code sau đây để kiểm tra điều đó:
Tương ứng với mỗi lựa chọn của người dùng, bạn có thể chạy tiếp những đoạn code khác nhau, những đoạn code VBA này, bạn có thể học được trong các khoá học VBA cùng các chuyên gia hàng đầu tại Gitiho.com.
MsgBox có hỗ trợ tiếng Việt có dấu không? Câu trả lời là không, vì sao? Vì Microsoft lập trình ra như vậy rồi. Nhưng có cách nào khác không? Câu trả lời là có, bạn có thể đọc bài Sử dụng tiếng việt có dấu với MsgBox VBA
Toàn bộ các đoạn code trong bài các bạn có thể xem tại Gist:
Nếu công việc của bạn liên quan nhiều đến quản lý, phân tích dữ liệu và làm báo cáo trên bảng tính thì giỏi Excel thôi chưa đủ. Nếu biết thêm về VBA sẽ giúp bạn tiết kiệm tối đa thời gian làm việc nhờ làm báo cáo tự động, phân tích và xử lý số liệu chính xác tuyệt đối, đặc biệt công cần lọ mọ sửa thủ công,…
Tất tần tật những kiến thức từ cơ bản đến nâng cao về cách sử dụng VBA trong Excel sẽ được đề cập trong khóa học VBAG01: Tuyệt đỉnh VBA - Tự động hóa Excel với lập trình VBA tại Gitiho
Hãy nhấn vào Học thử hoặc Đăng ký ngay!