Những thủ thuật trong OFFICE (4)

Tạo một bảng trắc nghiệm với trường MACROBUTTON, DATE

Nguyễn Phương Thảo - 525 - Điện Biên - TX. Yên Bái

    Nhiều khi chúng ta phải thiết lập những bảng dạng trắc nghiệm nhằm nhanh chóng nhận được các thông tin từ chính người trắc nghiệm. Các trường có sử dụng biến BOOKMARK nhiều khi dẫn tới người dùng hiểu nhầm ý mà đánh sai với yêu cầu. Bảng Form dạng trắc nghiệm sẽ giúp cho họ điền chính xác hơn.

    Thông thường Microsoft khuyên chúng ta nên kẻ một bảng bằng các đường lưới hoặc ta có thể chèn một TextBox không viền, không nền (Khi kẻ bảng, chọn nét vẽ là No Border ở hộp Line Style). Sau đó chúng ta hãy đánh vào trong các ô của bảng. Việc này sẽ tạo ra cấu trúc của văn bản hoàn chỉnh và không bị xáo trộn do chế độ hiển thị và che giấu các trường không giống nhau.

    Việc chèn các trường, như ở bài viết phần 2/20, tôi không nhắc lại nữa. Thông thường muốn nhanh, ta chọn Ctrl+F9 rồi đánh vào vùng xám. (Vùng của văn bản ẩn).

    Nếu chèn ngày tháng, ta đánh { DATE \@ "dd/MM/yyyy" \* MERGEFORMAT }

    Tương tự chèn thời gian thì {TIME \@ "h:mm:ss AM/PM" \* MERGEFORMAT}

    Các chỉ số theo sau trường, bạn có thể lựa chọn từ hộp thoại Insert Field với nút Option.

    Để chèn các lựa chọn cho người sử dụng, ta đánh vào các trường MACROBUTTON theo quy định sau:

    Nếu không có Macro thì ta đánh NoMacro thay cho MacroName. Nếu có Macro, ta đánh tên của Macro.

    Khi làm việc, ta click vào đây, Macro sẽ tự thi hành.

    Để thực hiện được trắc nghiệm. Ta hãy tạo 2 Macro sau (Nhấn Alt+F11, Ctrl+R. Rồi chọn tệp của mình chèn INSERT MODULE, đánh vào Module)

Option Explicit
Sub CheckIt()
ActiveDocument.AttachedTemplate.AutoTextEntries("Checked Box").Insert Where:=Selection.Range
End Sub

Sub UncheckIt()
ActiveDocument.AttachedTemplate.AutoTextEntries("Unchecked Box").Insert Where:=Selection.Range
End Sub

    Sau đó, ta hãy tạo 2 AutoText. Bằng cách bôi đen lựa chọn cả trường chèn và đặt tên.

Theo bảng sau:

    (Các dấu ( và ( bạn có thể chèn bằng ký tự Symbol khác)

    Mỗi khi Dclick để chọn, nút sẽ tự cập nhật, bằng cách đảo 2 ký tự Symbol.

    Tệp này đã có Macro và AutoText. Bạn có thể thử nghiệm theo ví dụ sau:

    Sau khi đã tạo bảng trắc nghiệm, bạn hãy Save As để chọn kiểu cất Template. Để khi Tạo mới File/New chọn tệp trắc nghiệm.

PcLeHoan 1996 - 2002
Mirror : http://www.pclehoan.com
Mirror : http://www.lehoanpc.net
Mirror : http://www.ktlehoan.com