如何在 Outlook 的電子郵件中插入日期選擇器?
假設您需要向您的同事發送工作計劃,在不同的日期將不同的任務分配給不同的人。 但是,您擔心手動輸入日期會出錯,因此您需要一個日期選擇器。 本教程提供了一種方法來幫助您在 Outlook 的電子郵件中插入日期選擇器。
使用 VBA 代碼在 Outlook 的電子郵件中插入日期選擇器
您可以運行以下 VBA 代碼在 Outlook 電子郵件中插入日期選擇器。 請按照以下說明進行操作。
1.啟動Outlook,按 其他 + F11 鍵打開 Microsoft Visual Basic for Applications 窗口。
2. 在左側窗格中,雙擊 Project1 > Microsoft Outlook對象 > 這個 Outlook 會話, 然後將下面的 VBA 代碼複製到 ThisOutlookSession(代碼) 窗口。
VBA 代碼:在 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
備註: 在代碼中,您可以更改“MMMM d, 年年” 到您需要的日期格式。
3.留在 Microsoft Visual Basic for Applications 窗口中,單擊 工具 > 引用。
4。 在裡面 參考 - 項目1 對話框,檢查 Microsoft Word 16.0對像庫 複選框,然後單擊 OK 保存更改。
5。 按 其他 + Q 關閉鍵 Microsoft Visual Basic for Applications 窗口。
6。 在裡面 郵件 查看,點擊 新郵件 按鈕下 首頁 選項卡以創建新電子郵件。
7。 在裡面 訊息
窗口,點擊 自定義快速訪問工具欄 按鍵 ,然後選擇 更多命令 從下拉菜單中。 看截圖:
8。 在裡面 Outlook選項 窗口,您需要進行如下配置。



VBA 腳本現已添加到 快速訪問工具欄 並顯示為您指定的圖標。
從現在開始,在撰寫電子郵件時,您可以單擊電子郵件上的日期選擇器圖標 快速訪問工具欄 將日期選擇器插入電子郵件正文,然後從中選擇您需要的日期。 請參閱以下演示。
筆記:
Kutools for Outlook-為Outlook帶來100個高級功能,並使工作更加輕鬆!
- 自動CC / BCC 根據規則發送電子郵件; 自動前進 自定義多封電子郵件; 自動回复 沒有交換服務器,還有更多自動功能...
- BCC警告 -當您嘗試全部答复時顯示消息 如果您的郵件地址在“密件抄送”列表中; 缺少附件時提醒,還有更多提醒功能...
- 在郵件對話中回复(全部)帶有所有附件; 回复許多電子郵件 片刻之間; 自動添加問候語 回复時將日期添加到主題中...
- 附件工具:管理所有郵件中的所有附件, 自動分離, 全部壓縮,重命名全部,保存全部...快速報告, 計算選定的郵件...
- 強大的垃圾郵件 習俗 刪除重複的郵件和聯繫人... 使您能夠在Outlook中做得更聰明,更快和更好。

