Bỏ qua nội dung chính

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

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 Khác + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Trong ngăn 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. bên trong 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 nút Khác + Q chìa khóa để đóng Microsoft Visual Basic cho các ứng dụng cửa sổ.

6. bên trong email xem, nhấp vào Email mới dưới nút Trang Chủ để tạo một email mới.

7. bên trong 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. bên trong Tùy chọn Outlook cửa sổ, bạn cần phải cấu hình như sau.

8.1) Chọn Macros trong Chọn lệnh từ danh sách thả xuống;
8.2) Chọn tập lệnh bạn đã tạo ở trên trong hộp lệnh bên trái;
8.3) Nhấp vào Thêm .
8.4) Giữ tập lệnh được chọn trong hộp bên phải, sau đó nhấp 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.
8.5) Nhấp OK trong Tùy chọn Outlook cửa sổ để lưu các thay đổi.

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.

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ú:

1) Bạn có thể chèn nhiều bộ chọn ngày vào nội dung email.
2) 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 một ngày mới nếu cần.
3) Bộ chọn ngày này cũng có thể được chèn vào phần nội dung của một cuộc hẹn hoặc một nhiệm vụ. Nếu bạn cần, hãy tạo một cuộc hẹn hoặc nhiệm vụ mới và lặp lại bước 7-8 ở trên để đạt được nó.

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 (3)
No ratings yet. Be the first to rate!
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