如何在 Outlook 的郵件中插入日期選擇器?
假設您需要向同事發送工作計劃,為不同的人分配不同的任務並指定不同的日期。然而,您擔心手動輸入日期會出錯,因此需要一個日期選擇器。本教程提供了一種方法,幫助您在 Outlook 的郵件中插入日期選擇器。
使用 VBA 程式碼在 Outlook 郵件中插入日期選擇器
您可以運行以下 VBA 程式碼來在 Outlook 郵件中插入日期選擇器。請按照以下步驟操作:
- 啟動您的 Outlook,按下 Alt + F11 鍵以打開 Microsoft Visual Basic for Applications 視窗。
- 在左側窗格中,雙擊 Project1 > Microsoft Outlook Objects > ThisOutlookSession, 然後將以下 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, yyyy" 更改為所需的日期格式。 - 保持在 Microsoft Visual Basic for Applications 視窗中,點擊 工具 > 參考資料。
- 在 References – Project1 對話框中,勾選 Microsoft Word 16.0 Object Library 選項,然後點擊 確定 保存更改。
- 按下 Alt + Q 鍵關閉 Microsoft Visual Basic for Applications 視窗。
- 在郵件檢視中,點擊 首頁 標籤下的 新建郵件 按鈕以創建新郵件。
- 在 郵件 窗口中,點擊 自定義快速訪問工具欄 按鈕
,然後選擇 更多命令 從下拉菜單中。見截圖:
- 在 Outlook 選項 窗口中,您需要進行如下配置:
- 在“從以下位置選擇命令”下拉列表中選擇 宏;
- 在左側的命令框中選擇您上面創建的腳本;
- 點擊 添加 按鈕。
- 保持右側框中的腳本被選中,然後點擊 修改 按鈕。在 修改按鈕 對話框中,為腳本分配一個新的按鈕並點擊 確定。
- 在 Outlook 選項 窗口中點擊 確定 保存更改。
- 現在,VBA 腳本已添加到 快速訪問工具欄,並顯示為您指定的圖標。
- 從現在開始,在撰寫郵件時,您可以點擊快速訪問工具欄上的日期選擇器圖標,將日期選擇器插入郵件正文中,然後從中選擇您需要的日期。請參閱以下演示。
- 您可以將多個日期選擇器插入郵件的正文中。
- 您可以更改已選擇的日期:點擊日期字段以顯示日期控件,然後根據需要選擇新日期。
- 此日期選擇器也可以插入約會或任務的正文中。如果需要,創建新的約會或任務並重複上述第 7-8 步即可實現。
- 如果您重新啟動 Outlook 後發現腳本無法運行,這是因為宏被禁用了。您需要按照以下步驟重新啟用宏:
- 點擊 文件 > 選項 進入 Outlook 選項 窗口。
- 點擊 信任中心 > 信任中心設置。
- 在 信任中心 窗口中,點擊 宏設置 標籤,選擇 啟用所有宏 選項,然後點擊 確定 > 確定 保存新設置。
- 再次重新啟動 Outlook。
Outlook中的AI郵件助理:更聰明的回覆,更清晰的溝通(一鍵奇蹟!) 免費
使用Kutools for Outlook的AI郵件助理簡化您的日常Outlook任務。這個強大的工具會從您過去的郵件中學習,提供智能且準確的答覆,優化您的郵件內容,並幫助您輕鬆起草和潤色郵件。

此功能支援:
- 智能回覆:根據您過去的對話獲得量身定制、精確且隨時可用的回覆。
- 增強內容:自動優化您的郵件文字以提高清晰度和影響力。
- 輕鬆撰寫:只需提供關鍵字,讓AI處理其餘部分,並有多種寫作風格可供選擇。
- 智能擴展:通過上下文感知建議來拓展您的思路。
- 摘要生成:即時獲取長郵件的簡潔概述。
- 全球觸及:輕鬆將您的郵件翻譯成任何語言。
此功能支援:
- 智能郵件回覆
- 優化的內容
- 基於關鍵字的草稿
- 智能內容擴展
- 郵件摘要生成
- 多語言翻譯
最重要的是,此功能永遠完全免費!不要再等待了——立即下載AI郵件助理並享受吧
最佳辦公室生產力工具
最新消息:Kutools for Outlook 推出免費版本!
體驗全新 Kutools for Outlook,超過100項精彩功能!立即下載!
🤖 Kutools AI :採用先進的AI技術輕鬆處理郵件,包括答覆、摘要、優化、擴充、翻譯及撰寫郵件。
📧 郵件自動化:自動回覆(支援POP及IMAP) / 排程發送郵件 / 發送郵件時根據規則自動抄送密送 / 自動轉發(高級規則) / 自動添加問候語 / 自動分割多收件人郵件為個別郵件 ...
📨 郵件管理:撤回郵件 / 根據主題等方式阻止詐騙郵件 / 刪除重複郵件 / 高級搜索 / 整合文件夾 ...
📁 附件專業工具:批量保存 / 批量拆離 / 批量壓縮 / 自動保存 / 自動拆離 / 自動壓縮 ...
🌟 介面魔法:😊更多精美與酷炫表情符號 /重要郵件來臨時提醒 / 最小化 Outlook 而非關閉 ...
👍 一鍵便利:帶附件全部答復 / 防詐騙郵件 / 🕘顯示發件人時區 ...
👩🏼🤝👩🏻 聯絡人與日曆:從選中郵件批量添加聯絡人 / 分割聯絡人組為個別組 / 移除生日提醒 ...
以您偏好的語言使用 Kutools,支援英語、西班牙語、德語、法語、中文及超過40種其他語言!
只需點擊一次,即可立即解鎖 Kutools for Outlook。別等了,現在下載提升您的工作效率!


🚀 一鍵下載 — 獲取全部 Office 插件
強力推薦:Kutools for Office(5合1)
一鍵下載五個安裝程式,包括 Kutools for Excel, Outlook, Word, PowerPoint及 Office Tab Pro。 立即下載!
- ✅ 一鍵便利:一次操作即可下載全部五套安裝包。
- 🚀 隨時處理任何 Office 任務:安裝您需求的插件,隨時隨地。
- 🧰 包含:Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint