Прескочи на основното съдържание

Как да вмъкна инструмент за избор на дата в имейли в Outlook?

Автор: Силувия Последна промяна: 2024-05-09

Да предположим, че трябва да изпратите работен график на вашите колеги, възлагайки различни задачи на различни хора на различни дати. Вие обаче се притеснявате да не допуснете грешки при ръчно въвеждане на датата, така че вместо това ви е необходим инструмент за избор на дата. Този урок предоставя метод, който да ви помогне да вмъкнете инструмент за избор на дата в имейли в Outlook.


Вмъкнете инструмент за избор на дата в имейли в Outlook с VBA код

Можете да изпълните следния VBA код, за да вмъкнете инструмент за избор на дата в имейли на Outlook. Моля, следвайте инструкциите по-долу.

  1. Launch your Outlook, press the Друг + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
  2. In the left pane, double click Project1 > Обекти на Microsoft Outlook > 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
    Забележка: In the code, you can change "d MMMM, yyyy" to the date format you need.
  3. Останете в Microsoft Visual Basic за приложения прозорец, кликнете Инструменти > Препратки.
  4. в Референции – Проект1 диалоговия прозорец, проверете Библиотека с обекти Microsoft Word 16.0 отметка и щракнете OK за да запазите промените.
  5. Натиснете Друг + Q ключове за затваряне на Microsoft Visual Basic за приложения прозорец.
  6. в Mail преглед, щракнете върху нов имейл бутона под Начало за създаване на нов имейл.
  7. в Събщение кликнете върху Персонализирайте лентата с инструменти за бърз достъп бутон И след това изберете Още команди от падащото меню. Вижте екранна снимка:
  8. в Outlook Options прозорец, трябва да конфигурирате както следва.
    1. Изберете Макроси в Изберете команда от падащ списък;
    2. Select the script you created above in the left commands box;
    3. Щракнете върху Добави бутон.
    4. Keep the script selected in the right box, and then click the Промяна бутон. В Бутон за промяна диалоговия прозорец, задайте нов бутон на скрипта и щракнете OK.
    5. Кликнете OK в Outlook Options прозорец за запазване на промените.
  9. Скриптът VBA вече е добавен към Лента с инструменти за бърз достъп и се показва като иконата, която сте посочили.
  10. Отсега нататък, когато пишете имейл, можете да щракнете върху иконата за избор на дата на Лента с инструменти за бърз достъп за да вмъкнете инструмент за избор на дата в тялото на имейла и след това да изберете желаната дата от него. Вижте следната демонстрация.
Забележки:
  • You can insert multiple date pickers into the body of an email.
  • You can change the date you have selected: click on the date field to display the Date control, then select a new date as needed.
  • This date picker can also be inserted into the body of an appointment or a task. If you need to, create a new appointment or task and repeat the step 7-8 above to achieve it.
  • If you restart Outlook and find that the script does not run. That's because the macro was disabled. You need to follow the steps below to re-enable the macro:
    1. Кликнете върху досие > Настроики да влезете Outlook Options прозорец.
    2. Кликнете върху Trust Center > Настройки на Trust Center.
    3. в Trust Center прозорец, щракнете върху Настройки на макроса раздели, изберете Активирайте всички макроси и щракнете върху OK > OK за да запазите новите настройки.
    4. Restart Outlook once more.

Най-добрите инструменти за продуктивност в офиса

Kutools за Outlook - Над 100 мощни функции, за да заредите вашия Outlook

🤖 AI Mail Assistant: Незабавни професионални имейли с AI магия - с едно щракване до гениални отговори, перфектен тон, многоезично владеене. Трансформирайте имейла без усилие! ...

📧 Автоматизиране на имейли: Извън офиса (налично за POP и IMAP)  /  График за изпращане на имейли  /  Автоматично CC/BCC по правила при изпращане на имейл  /  Автоматично пренасочване (разширени правила)   /  Автоматично добавяне на поздрав   /  Автоматично разделяне на имейлите с множество получатели на отделни съобщения ...

📨 Управление на Email: Лесно извикване на имейли  /  Блокиране на измамни имейли по теми и други  /  Изтриване на дублирани имейли  /  подробно търсене  /  Консолидиране на папки ...

📁 Прикачени файлове ProПакетно запазване  /  Партидно отделяне  /  Партиден компрес  /  Автоматично запазване   /  Автоматично отделяне  /  Автоматично компресиране ...

🌟 Магия на интерфейса: 😊 Още красиви и готини емотикони   /  Увеличете продуктивността на Outlook с изгледи с раздели  /  Минимизирайте Outlook, вместо да затваряте ...

???? Чудеса с едно кликване: Отговорете на всички с входящи прикачени файлове  /   Антифишинг имейли  /  🕘Показване на часовата зона на подателя ...

👩🏼‍🤝‍👩🏻 Контакти и календар: Групово добавяне на контакти от избрани имейли  /  Разделете група контакти на отделни групи  /  Премахнете напомнянията за рожден ден ...

Над 100 Характеристики Очаквайте вашето проучване! Щракнете тук, за да откриете повече.

 

 

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