M ở workbook
64 Mảng giá trị
8.2.5. Cách ộp thoại mặc định trong Excel – Tập đối tượng Dialogs
Tập đối tượng Dialogs của đối tượng Application bao gồm 258 phần tử thể hiện hầu hết các hộp thoại mặc định trong Excel. Mỗi hộp thoại có một hằng số được định nghĩa trước giúp người dùng có thể xác định được hộp thoại cần hiển thị một cách dễ dàng. Chẳng hạn như khi muốn hiển thị hộp thoại GoTo của Excel, sử dụng hằng số xlDialogFormulaGoto.
Sử dụng phương thức Show để hiển thị các hộp thoại. Ví dụ sau sẽ hiển thị hộp thoại Go To của Excel.
Application.Dialogs(xlDialogFormulaGoto).Show
Người lập trình còn có thể viết mã lệnh để kiểm tra cách thức đóng hộp thoại. Trong ví dụ sau, biển Result sẽ trả về TRUE nếu người dùng kích chuột vào nút OK, và FALSE nếu kích chuột vào nút Cancel hoặc nhấn phím ESC.
Result = Application.Dialogs(xlDialogFormulaGoto).Show
Cần phải lưu ý rằng, tính năng này không được trình bày rõ ràng trong các tài liệu trợ giúp củ Excel. Các tài liệu trợ giúp rất sơ lược, không đề cập đến một sự thật: các hộp thoại hiển thị khi gọi bằng VBA không hoàn toàn giống như khi gọi thông qua trình đơn trong Excel. Chính ví vậy, chẳng có cách nào khác ngoài việc thử nghiệm để kiểm tra hoạt động của các hộp thoại.
CHÚ Ý Các hộp thoại hiển thị khi gọi bằng VBA không hoàn toàn giống như khi gọi thông
Trong trường hợp của hộp thoại Go To, khi hiển thị bằng VBA, nút Special bị mờ đi, không hoàn toàn giống như khi chọn từ trình đơn EditÖGo To.
Ngoài ra, còn có một vấn đề khác nữa, đó là việc không thể hiển thị được các hộp thoại có nhiều thẻ khác nhau. Lấy ví dụ với hộp thoại Format Cell, không có cách nào để hiển thị đầy đủ hộp thoại này với nhiều thẻ khác nhau, thay vào đó, chỉ có thể hiển thị một thẻ tại một thời điểm. Đoạn mã sau chỉ hiển thị được thẻ Alignment của hộp thoại Format Cells:
Application.Dialogs(xlDialogAlignment).Show
Để hiển thị các thẻ khác trong hộp thoại Format Cells, sử dụng các hằng số đã được định nghĩa trước như: xlDialogFormatNumber, xlDialogBorder, xlDialogCellProtection, xlDialogPatterns, hoặc xlDialogFontProperties.
Có rất nhiều hằng số được định nghĩa trước tương ứng với một hộp thoại trong Excel. Danh sách đầy đủ các hằng số này có thể được tra cứu sử dụng Object Browser: