Bỏ qua nội dung chính

Làm cách nào để chèn bộ chọn ngày trong email trong Outlook?

Tác giả: Siluvia Sửa đổi lần cuối: 2024-05-09

Giả sử bạn cần gửi một lịch trình làm việc cho đồng nghiệp của mình, giao những nhiệm vụ khác nhau cho những người khác nhau vào những ngày khác nhau. Tuy nhiên, bạn lo lắng về việc nhập nhầm ngày theo cách thủ công, vì vậy bạn cần một công cụ chọn ngày để thay thế. Hướng dẫn này cung cấp một phương pháp giúp bạn chèn bộ chọn ngày trong email trong Outlook.


Chèn bộ chọn ngày trong Email trong Outlook với mã VBA

Bạn có thể chạy mã VBA sau để chèn bộ chọn ngày trong email Outlook. Hãy làm theo hướng dẫn dưới đây.

  1. Khởi chạy Outlook của bạn, nhấn nút Khác + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
  2. Trong khung bên trái, nhấp đúp vào Project1 > Đối tượng Microsoft Outlook > OutlookSession này, và sau đó sao chép mã VBA sau vào ThisOutlookSession (Mã) cửa sổ.
    Mã VBA: Chèn bộ chọn ngày trong email Outlook
    Sub DatePicker()
    'Updated by Extendoffice 20220615
      Dim xDoc As Document
      On Error Resume Next
      Set xDoc = Application.ActiveInspector.WordEditor
      With xDoc.Application.Selection
        .Range.ContentControls.Add (wdContentControlDate)
        .ParentContentControl.DateDisplayFormat = "MMMM d, yyyy"
        .InsertAfter Format(Now(), "MMMM d, yyyy")
        .MoveRight wdCharacter, 1
      End With
    End Sub
    Lưu ý: Trong mã, bạn có thể thay đổi "MMMM d, yyyy" sang định dạng ngày bạn cần.
  3. Ở trong Microsoft Visual Basic cho các ứng dụng cửa sổ, nhấp CÔNG CỤ > Tài liệu tham khảo.
  4. Trong tạp chí Tài liệu tham khảo - Project1 hộp thoại, kiểm tra Thư viện đối tượng Microsoft Word 16.0 hộp kiểm và nhấp vào OK để lưu các thay đổi.
  5. Nhấn Khác + Q chìa khóa để đóng Microsoft Visual Basic cho các ứng dụng cửa sổ.
  6. Trong tạp chí email xem, nhấp vào Email mới dưới nút Trang Chủ để tạo một email mới.
  7. Trong tạp chí Tin nhắn cửa sổ, nhấp vào Tùy chỉnh thanh công cụ truy cập nhanh nút , Và sau đó chọn Các lệnh khác từ menu thả xuống. Xem ảnh chụp màn hình:
  8. Trong tạp chí Tùy chọn Outlook cửa sổ, bạn cần phải cấu hình như sau.
    1. Chọn Macros trong Chọn lệnh từ danh sách thả xuống;
    2. Chọn tập lệnh bạn đã tạo ở trên trong hộp lệnh bên trái;
    3. Nhấn vào Thêm .
    4. Giữ tập lệnh được chọn trong hộp bên phải, sau đó bấm vào Sửa đổi nút. bên trong Nút sửa đổi hộp thoại, gán một nút mới cho tập lệnh và nhấp vào OK.
    5. Nhấp chuột OK trong Tùy chọn Outlook cửa sổ để lưu các thay đổi.
  9. Tập lệnh VBA hiện đã được thêm vào Thanh công cụ truy cập nhanh và hiển thị dưới dạng biểu tượng bạn đã chỉ định.
  10. Từ bây giờ, khi soạn email, bạn có thể nhấp vào biểu tượng bộ chọn ngày trên Thanh công cụ truy cập nhanh để chèn một bộ chọn ngày vào nội dung email, sau đó chọn một ngày bạn cần từ nó. Xem bản demo sau đây.
Ghi chú:
  • Bạn có thể chèn nhiều bộ chọn ngày vào nội dung email.
  • Bạn có thể thay đổi ngày bạn đã chọn: nhấp vào trường ngày để hiển thị điều khiển Ngày, sau đó chọn ngày mới nếu cần.
  • Bộ chọn ngày này cũng có thể được chèn vào nội dung của cuộc hẹn hoặc nhiệm vụ. Nếu cần, hãy tạo cuộc hẹn hoặc nhiệm vụ mới và lặp lại bước 7-8 ở trên để đạt được mục tiêu đó.
  • Nếu bạn khởi động lại Outlook và thấy rằng tập lệnh không chạy. Đó là do macro bị tắt. Bạn cần làm theo các bước bên dưới để kích hoạt lại macro:
    1. Nhấp vào Tập tin > Các lựa chọn Để vào Tùy chọn Outlook cửa sổ.
    2. Nhấp vào Trung tâm tin tưởng > Cài đặt Trung tâm Niềm tin.
    3. Trong tạp chí Trung tâm tin tưởng cửa sổ, nhấp vào Cài đặt Macro tab, chọn Bật tất cả các macro và nhấp vào OK > OK để lưu cài đặt mới.
    4. Khởi động lại Outlook một lần nữa.

Công cụ năng suất văn phòng tốt nhất

Kutools cho Outlook - Hơn 100 tính năng mạnh mẽ để tăng cường Outlook của bạn

🤖 Trợ lý thư AI: Email chuyên nghiệp tức thì với phép thuật AI--một cú nhấp chuột để có câu trả lời xuất sắc, giọng điệu hoàn hảo, khả năng thông thạo đa ngôn ngữ. Chuyển đổi email một cách dễ dàng! ...

📧 Tự động hoá email: Vắng Mặt (Có sẵn cho POP và IMAP)  /  Lên lịch gửi email  /  Tự động CC/BCC theo quy định khi gửi Email  /  Tự động chuyển tiếp (Quy tắc nâng cao)   /  Tự động thêm lời chào   /  Tự động chia email nhiều người nhận thành các tin nhắn riêng lẻ hữu ích. Cảm ơn !

📨 Quản lý email: Dễ dàng thu hồi email  /  Chặn email lừa đảo theo chủ đề và những người khác  /  Xóa các email trùng lặp  /  Tìm Kiếm Nâng Cao  /  Hợp nhất các thư mục hữu ích. Cảm ơn !

📁 Tệp đính kèm chuyên nghiệpLưu hàng loạt  /  Tách hàng loạt  /  Nén hàng loạt  /  Tự động lưu   /  Tự động tách  /  Tự động nén hữu ích. Cảm ơn !

🌟 Giao diện ma thuật: 😊Thêm nhiều biểu tượng cảm xúc đẹp và thú vị hơn   /  Tăng năng suất Outlook của bạn với chế độ xem theo thẻ  /  Thu nhỏ Outlook thay vì đóng hữu ích. Cảm ơn !

👍 Kỳ quan chỉ bằng một cú nhấp chuột: Trả lời tất cả bằng tệp đính kèm đến  /   Email chống lừa đảo  /  🕘Hiển thị múi giờ của người gửi hữu ích. Cảm ơn !

👩🏼‍🤝‍👩🏻 Danh bạ & Lịch: Thêm hàng loạt liên hệ từ các email đã chọn  /  Chia nhóm liên hệ thành các nhóm riêng lẻ  /  Xóa lời nhắc sinh nhật hữu ích. Cảm ơn !

Trên 100 tính năng Chờ đợi sự khám phá của bạn! Bấm vào đây để khám phá thêm.

 

 

Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
WHEN I CLOSE THE OUTLOOK AND RESTAR THIS IS NOT WORKING, WHY? CAN YOU HELP
This comment was minimized by the moderator on the site
Hi,

I'm very sorry, this issue occurred because macros were disabled after restarting Outlook. Please follow these steps to re-enable macros:
Click on File > Options to enter the Outlook Options window, click on Trust Center > Trust Center Settings, in the Trust Center window, click on the Macro Settings tab, select the Enable all macros option, and click OK to save the new settings. Please restart Outlook once more, and the issue should be resolved.
This comment was minimized by the moderator on the site
Hello. Very clear instructions, thank you.
When I attempt to use the macro, I get this error:
"Compile error: User defined type not defined."
Sub DatePicker() and xDoc As Document are highlighted.
Any ideas on how to fix it please?
This comment was minimized by the moderator on the site
Hi Dave,

To solve this problem, please follow the instruction of step 3 and 4 to enable the Microsoft Word 16.0 Object Library option in the Microsoft Visual Basic for Applications window.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/outlook-word-referece-vba.png?1711618070
This comment was minimized by the moderator on the site
This was exactly what I was looking for. Thank you!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations