Перейти до основного матеріалу

Як вставити засіб вибору дати в електронні листи в Outlook?

Припустимо, вам потрібно надіслати своїм колегам графік роботи, призначаючи різні завдання різним людям на різні дати. Однак вас турбує помилка при введенні дати вручну, тому замість цього вам потрібен засіб вибору дати. У цьому посібнику наведено метод, який допоможе вам вставити засіб вибору дати в електронні листи в Outlook.


Вставте засіб вибору дати в електронні листи в Outlook за допомогою коду VBA

Ви можете запустити наступний код VBA, щоб вставити засіб вибору дати в електронні листи Outlook. Будь ласка, дотримуйтесь інструкцій нижче.

1. Запустіть Outlook, натисніть інший + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.

2. На лівій панелі двічі клацніть Project1 > Об'єкти Microsoft Outlook > Ця сесія OutlookSession, а потім скопіюйте наступний код 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

Примітка: У коді ви можете змінити «д ММММ, рррр” у потрібний формат дати.

3. Залишайтеся в Microsoft Visual Basic для додатків вікна, натисніть Tools > Список літератури.

4 В Список літератури – Проект1 діалогове вікно, перевірте Бібліотека об’єктів Microsoft Word 16.0 і натисніть OK зберегти зміни.

5 Натисніть кнопку інший + Q клавіші, щоб закрити Microsoft Visual Basic для додатків вікна.

6 В пошта натисніть, клацніть на Нова електронна пошта кнопка під кнопкою Головна вкладку, щоб створити новий електронний лист.

7 В Повідомлення вікно, натисніть кнопку Налаштування панелі швидкого доступу button , А потім виберіть Більше команд зі спадного меню. Дивіться знімок екрана:

8 В Параметри Outlook вікно, вам потрібно налаштувати наступним чином.

8.1) Виберіть Макрос в Виберіть команду з випадаючий список;
8.2) Виберіть сценарій, який ви створили вище, у вікні команд зліва;
8.3) Клацніть на додавати кнопки.
8.4) Залиште скрипт вибраним у правому полі, а потім натисніть кнопку Змінювати кнопку. В Кнопка зміни діалоговому вікні, призначте нову кнопку для сценарію та натисніть ОК.
8.5) Клацніть OK в Параметри Outlook вікно для збереження змін.

Сценарій VBA тепер додано до файлу Панель швидкого доступу і відображатиметься як вказаний вами значок.

Відтепер, створюючи електронний лист, ви можете натиснути значок вибору дати на Панель швидкого доступу щоб вставити засіб вибору дати в тіло електронного листа, а потім виберіть з нього потрібну дату. Перегляньте наступну демонстрацію.

Примітки:

1) Ви можете вставити кілька засобів вибору дати в тіло електронного листа.
2) Ви можете змінити вибрану дату: клацніть на полі дати, щоб відобразити елемент керування датою, а потім виберіть нову дату, якщо потрібно.
3) Цей засіб вибору дати також можна вставити в тіло зустрічі або завдання. Якщо потрібно, створіть нову зустріч або завдання і повторіть кроки 7-8 вище, щоб досягти його.

Найкращі інструменти продуктивності офісу

Kutools для Outlook - Понад 100 потужних функцій, які покращать ваш Outlook

🤖 AI Mail Assistant: Миттєві професійні електронні листи з магією штучного інтелекту – геніальні відповіді одним клацанням, ідеальний тон, багатомовна майстерність. Трансформуйте електронну пошту без зусиль! ...

???? Автоматизація електронної пошти: Поза офісом (доступно для POP та IMAP)  /  Розклад надсилання електронних листів  /  Автоматична копія/прихована копія за правилами під час надсилання електронної пошти  /  Автоматичне пересилання (розширені правила)   /  Автоматично додавати привітання   /  Автоматично розділяйте електронні листи кількох одержувачів на окремі повідомлення ...

📨 Управління електронною поштою: Легко відкликайте електронні листи  /  Блокуйте шахрайські електронні листи за темами та іншими  /  Видалити повторювані електронні листи  /  розширений пошук  /  Консолідація папок ...

📁 Вкладення ProПакетне збереження  /  Пакетне від'єднання  /  Пакетний компрес  /  Автозавантаження   /  Автоматичне від'єднання  /  Автокомпресія ...

???? Магія інтерфейсу: 😊Більше красивих і класних смайликів   /  Підвищте продуктивність Outlook за допомогою вкладок  /  Згорніть Outlook замість того, щоб закривати ...

👍 Дива в один клік: Відповісти всім із вхідними вкладеннями  /   Антифішингові електронні листи  /  🕘Показувати часовий пояс відправника ...

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

більше Особливості 100 Чекайте на ваше дослідження! Натисніть тут, щоб дізнатися більше.

 

 

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