Как вставить средство выбора даты в электронные письма в Outlook?

Author Siluvia Last modified 2025-08-26

Предположим, вам нужно отправить расписание работы коллегам, назначая разные задачи разным людям на разные даты. Однако вы беспокоитесь о том, что можете допустить ошибки при ручном вводе даты, поэтому вам нужен инструмент выбора даты. Это руководство предоставляет метод, который поможет вам вставить средство выбора даты в электронные письма в Outlook.

doc-insert-date-picker-1

Вставка средства выбора даты в электронные письма в Outlook с помощью кода VBA

Вы можете запустить следующий код VBA для вставки средства выбора даты в электронные письма Outlook. Пожалуйста, следуйте приведенным ниже инструкциям.

Запустите ваш Outlook, нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
В левой панели дважды щелкните Project1 > Microsoft Outlook Objects > ThisOutlookSession, затем скопируйте следующий код VBA в ThisOutlookSession (Code) окно.
Код 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, нажмите Tools > References.
В диалоговом окне References – Project1 установите флажок Microsoft Word 16.0 Object Library и нажмите OK, чтобы сохранить изменения.
Нажмите клавиши Alt + Q, чтобы закрыть окно Microsoft Visual Basic for Applications.
В представлении Mail нажмите кнопку New Email под вкладкой Home, чтобы создать новое письмо.
В Message окне нажмите Customize Quick Access Toolbar кнопку , а затем выберите More Commands из выпадающего меню. См. скриншот:
В Outlook Options окне вам необходимо выполнить следующие настройки.
1. Выберите Macros в раскрывающемся списке Choose command from;
2. Выберите скрипт, созданный выше, в левом поле команд;
3. Нажмите кнопку Add.
4. Оставьте скрипт выбранным в правом поле, а затем нажмите кнопку Modify. В диалоговом окне Modify Button назначьте новую кнопку для скрипта и нажмите OK.
5. Нажмите OK в окне Outlook Options, чтобы сохранить изменения.
Скрипт VBA теперь добавлен на Панель быстрого доступа и отображается как значок, который вы указали.
Теперь, при написании электронного письма, вы можете нажать на значок средства выбора даты на Панели быстрого доступа чтобы вставить средство выбора даты в тело письма, а затем выбрать нужную дату из него. Смотрите следующую демонстрацию.

Примечания:

Вы можете вставить несколько средств выбора даты в тело одного электронного письма.
Вы можете изменить выбранную дату: нажмите на поле даты, чтобы отобразить элемент управления Дата, затем выберите новую дату по мере необходимости.
Это средство выбора даты также можно вставить в тело встречи или задачи. Если это необходимо, создайте новую встречу или задачу и повторите шаги 7-8 выше, чтобы достичь этого.
Если вы перезапустите Outlook и обнаружите, что скрипт не работает. Это потому, что макрос был отключен. Вам нужно выполнить следующие шаги, чтобы снова включить макрос:
1. Нажмите File > Options, чтобы войти в окно Outlook Options.
2. Нажмите Trust Center > Trust Center Settings.
3. В окне Trust Center нажмите на вкладку Macro Settings, выберите опцию Enable all macros и нажмите OK > OK, чтобы сохранить новые настройки.
4. Перезапустите Outlook еще раз.

AI Mail Assistant в Outlook: Умные ответы, четкое общение (волшебство в один клик!) БЕСПЛАТНО

Оптимизируйте свои ежедневные задачи в Outlook с помощью AI Mail Assistant от Kutools для Outlook. Этот мощный инструмент изучает ваши прошлые письма, чтобы предлагать умные и точные ответы, оптимизировать содержание ваших писем и помогать легко создавать и редактировать сообщения.

Эта функция поддерживает:

Умные ответы: Получайте ответы, созданные на основе ваших предыдущих разговоров — персонализированные, точные и готовые к отправке.
Улучшенное содержание: Автоматически улучшайте текст ваших писем для большей ясности и воздействия.
Простое составление: Просто укажите ключевые слова, и пусть ИИ сделает остальную работу, предлагая несколько стилей написания.
Интеллектуальные расширения: Расширяйте свои мысли с помощью контекстно-зависимых предложений.
Суммаризация: Мгновенно получайте краткие обзоры длинных писем.
Глобальный охват: Легко переводите ваши письма на любой язык.

Эта функция поддерживает: