Как отложить отправку приглашения на собрание в Outlook?
Обычно вы можете применить функцию отложенной доставки для отправки сообщения в определенное время, а не прямо сейчас. Но иногда вам нужно отложить отправку приглашения на собрание, например электронного письма. Как можно было отправить приглашение на собрание в нужное время, как вам нужно в Outlook?
Отложить отправку приглашения на собрание в Outlook с помощью кода VBA
Отложить отправку приглашения на собрание в Outlook с помощью кода VBA
Может быть, нет прямого способа отложить приглашение на встречу в Outlook, но приведенный ниже код VBA может оказать вам услугу, пожалуйста, сделайте следующее:
1. Во-первых, вы должны создать новую задачу. В новом Сложность задачи окна:
(1.) Укажите тему, дату начала и дату окончания собрания;
(2.) Установите дату и время напоминания, когда вы хотите отправить приглашение на собрание;
(3.) Введите сообщение о встрече, как вам нужно.
2. После создания задачи нажмите Сохранить и закрыть возможность закрыть это окно.
3. Затем зажмите ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
4. В Microsoft Visual Basic для приложений окно, дважды щелкните Эта сессия Outlook из Проект1 (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(",,", ",")
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
Внимание: В приведенном выше коде: Встреча тест тема, которую вы создали для встречи на шаге 1; и вам следует изменить информацию о адреса получателей, место встречи, время начала и продолжительность встречи к вашим собственным.
5. Сохраните и закройте код, затем перезапустите Outlook, чтобы этот код вступил в силу.
6. С этого момента, когда напоминание об элементе задачи появляется в указанное вами время, Outlook автоматически отправляет приглашение на собрание.
Лучшие инструменты для офисной работы
Kutools for Outlook - Более 100 мощных функций для улучшения вашего Outlook
🤖 Почтовый помощник с искусственным интеллектом: Мгновенные профессиональные электронные письма с помощью магии искусственного интеллекта: гениальные ответы одним щелчком мыши, идеальный тон, многоязычное владение. Преобразуйте электронную почту без особых усилий! ...
???? Автоматизация электронной почты: Нет на месте (доступно для POP и IMAP) / Расписание отправки писем / Автоматическое копирование/скрытая копия по правилам при отправке электронной почты / Автопересылка (расширенные правила) / Автоматическое добавление приветствия / Автоматически разделять электронные письма от нескольких получателей на отдельные сообщения ...
📨 Управление электронной почтой: Легко вспоминать электронные письма / Блокировка мошеннических писем от субъектов и других лиц / Удалить повторяющиеся электронные письма / Поиск / Объединение папок ...
📁 Вложения Pro: Пакетное сохранение / Пакетное отсоединение / Пакетное сжатие / Автосохранение / Авто отсоединение / Автоматическое сжатие ...
???? Магия интерфейса: 😊Больше красивых и крутых смайлов / Повысьте производительность Outlook с помощью представлений с вкладками / Свернуть Outlook вместо закрытия ...
???? Чудеса в один клик: Ответить всем с входящими вложениями / Антифишинговые письма / 🕘Показать часовой пояс отправителя ...
👩🏼🤝👩🏻 Контакты и календарь: Пакетное добавление контактов из выбранных писем / Разделить группу контактов на отдельные группы / Удалить напоминания о днях рождения ...
Более Особенности 100 Ждем вашего исследования! Нажмите здесь, чтобы узнать больше.