Как отложить отправку приглашения на собрание в Outlook?
Обычно вы можете использовать функцию «Отложенная доставка», чтобы отправить сообщение в определенное время, а не сразу. Однако иногда вы хотите отложить отправку приглашения на собрание, как письмо. Как можно отправить приглашение на собрание в нужное время в Outlook?
Отложить отправку приглашения на собрание в Outlook с помощью кода VBA
Отложить отправку приглашения на собрание в Outlook с помощью кода VBA
Может быть, нет прямого способа отложить отправку приглашения на собрание в Outlook, но следующий код VBA может помочь вам, сделайте так:
1. Сначала нужно создать новую задачу. В окне новой Задачи:
(1.) Укажите тему, дату начала и дату окончания собрания;
(2.) Установите дату и время напоминания, когда вы хотите отправить приглашение на собрание;
(3.) Напишите текст приглашения на собрание по вашему усмотрению.

2. После создания задачи нажмите кнопку Сохранить и закрыть, чтобы закрыть это окно.
3. Затем нажмите клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic для приложений.
4. В окне Microsoft Visual Basic для приложений дважды щелкните ThisOutlookSession в панели Project1(VbaProject.OTM), чтобы открыть модуль, затем скопируйте и вставьте следующий код в пустой модуль.
Код VBA: Отложить отправку приглашения на собрание:
Private Sub Application_Reminder(ByVal Item As Object)
Dim xTaskItem As TaskItem
Dim xAppointmentItem As AppointmentItem
Dim xRcpArr() As String
If (Item.Class <> olTask) Or (LCase(Item.Subject) <> "Meeting test") Then
Exit Sub
End If
Set xTaskItem = Item
xRcpArr = VBA.Split("yy@addin99.com,sky@addin99.com,ruby@addin99.com", ",")
Set xAppointmentItem = Outlook.Application.CreateItem(olAppointmentItem)
With xAppointmentItem
.MeetingStatus = olMeeting
For i = 0 To UBound(xRcpArr)
.Recipients.Add (xRcpArr(i))
Next
.Subject = xTaskItem.Subject
.Location = "Office room 1002"
.Start = xTaskItem.StartDate + #2:00:00 PM#
.Body = xTaskItem.Body
.Duration = 120
.ReminderSet = True
.ReminderMinutesBeforeStart = 20
.Save
.Send
End With
xTaskItem.MarkComplete
Set xTaskItem = Nothing
End Sub

Примечание: В приведенном выше коде: Meeting test — это тема, которую вы создали для собрания на шаге 1; также следует изменить информацию о адресах получателей, месте проведения собрания, времени начала и продолжительности собрания на свои собственные данные.
5. Сохраните и закройте код, затем перезапустите Outlook, чтобы этот код вступил в силу.
6. С этого момента, когда напоминание о задаче появится в установленное вами время, Outlook автоматически отправит приглашение на собрание.
Лучшие инструменты для повышения продуктивности работы с Office
Срочные новости: бесплатная версия Kutools для Outlook уже доступна!
Оцените обновленный Kutools для Outlook с более чем100 невероятными функциями! Нажмите, чтобы скачать прямо сейчас!
📧 Автоматизация Email: Автоответчик (Доступно для POP и IMAP) / Запланировать отправку писем / Авто Копия/Скрытая копия по правилам при отправке писем / Автоматическое перенаправление (Расширенное правило) / Автоматически добавить приветствие / Авторазделение Email с несколькими получателями на отдельные письма ...
📨 Управление Email: Отозвать письмо / Блокировать вредоносные письма по теме и другим критериям / Удалить дубликаты / Расширенный Поиск / Организовать папки ...
📁 Вложения Pro: Пакетное сохранение / Пакетное открепление / Пакетное сжатие / Автосохранение / Автоматическое отсоединение / Автоматическое сжатие ...
🌟 Волшебство интерфейса: 😊Больше красивых и стильных эмодзи / Напоминание при поступлении важных писем / Свернуть Outlook вместо закрытия ...
👍 Удобные функции одним кликом: Ответить всем с вложениями / Антифишинговая Email / 🕘Показать часовой пояс отправителя ...
👩🏼🤝👩🏻 Контакты и Календарь: Пакетное добавление контактов из выбранных Email / Разделить группу контактов на отдельные / Удалить напоминание о дне рождения ...
Используйте Kutools на вашем языке – поддерживаются Английский, Испанский, Немецкий, Французский, Китайский и более40 других!


🚀 Скачайте все дополнения Office одним кликом
Рекомендуем: Kutools для Office (5-в-1)
Скачайте сразу пять установщиков одним кликом — Kutools для Excel, Outlook, Word, PowerPoint и Office Tab Pro. Нажмите, чтобы скачать прямо сейчас!
- ✅ Все просто: скачайте все пять установочных пакетов одним действием.
- 🚀 Готово для любой задачи Office: Установите нужные дополнения тогда, когда они вам понадобятся.
- 🧰 Включено: Kutools для Excel / Kutools для Outlook / Kutools для Word / Office Tab Pro / Kutools для PowerPoint