Как изменить событие по умолчанию на весь день на занятое в Outlook?

По умолчанию Outlook устанавливает статус встреч и собраний в "Занятый", но мероприятия на весь день "Свободно" (см. скриншот ниже). Вам необходимо вручную изменить статус «Показать как» на «Занят» каждый раз, когда вы создаете мероприятие на весь день. Чтобы изменить отображение по умолчанию в качестве статуса событий на весь день на «Занят», в статье представлены два метода.

Измените событие по умолчанию на весь день на занято, создав пользовательскую форму.

Пользовательская форма может помочь вам создать мероприятие на весь день с параметрами по умолчанию. Показать как статус Занятый. Пожалуйста, сделайте следующее.

1. Перейдите к просмотру календаря. Нажмите Главная > Новая встреча.

2. В новом окне «Назначение» нажмите «Разработчик» > «Создать эту форму».

Советы: Если же линия индикатора Застройщик вкладка не отображается на ленте, следуйте инструкциям в этой статье для его отображения.

3. Затем окно встречи переходит в режим дизайна. Вам нужно нажать на (P.2) меню.

4. Перетащите Событие на весь день поле и Показать время как поле из Выбор поля панель отдельно к плате под (P.2) таб

5. Щелкните правой кнопкой мыши Событие на весь день поле и выберите Объекты из контекстного меню.

6. в Объекты диалоговое окно необходимо настроить следующим образом.

7. Щелкните правой кнопкой мыши поле со списком Показать время как поле и нажмите Объекты из контекстного меню.

8. в Объекты диалоговое окно необходимо настроить следующим образом.

9. Нажмите Опубликовать > Опубликовать форму как на ленте.

10. в Опубликовать форму как диалоговое окно, вам необходимо:

11. Закройте окно «Назначение» без сохранения.

12. С этого момента, когда вам нужно создать мероприятие на весь день со статусом «Показать как по умолчанию» на «Занят», перейдите к Календарь посмотреть и нажать Главная > Новые предметы > Пользовательские формы > «Имя пользовательской формы».

Примечание: Чтобы создать мероприятие на весь день со статусом «Показать как» по умолчанию «Свободно», сделайте как обычно: нажмите Главная > Новая встреча, а затем проверьте Событие на весь день коробка в Назначение окно.

Измените событие по умолчанию на весь день на занято с помощью VBA

В приведенном выше методе слишком много шагов. Если вам всегда нужно создать событие на весь день со статусом «Показать как» по умолчанию «Занят», следующий код VBA может помочь вам легко это сделать.

1. Запустите Outlook, нажмите другой + F11 клавиши одновременно, чтобы открыть Microsoft Visual Basic для приложений окно.

2. в Microsoft Visual Basic для приложений окно, двойной щелчок по Project1 > Объекты Microsoft Outlook > Эта сессия Outlook для открытия Эта сессия Outlook (Код) окно, а затем скопируйте следующий код в это окно кода.

Код VBA: установите для состояния события «Весь день» по умолчанию значение «Занят».

Public WithEvents GInspectors As Inspectors
Public WithEvents GAppointmentItem As AppointmentItem

Private Sub Application_Startup()
'Updated by Extendoffice 20220413
  Set GInspectors = Application.Inspectors
End Sub

Private Sub GInspectors_NewInspector(ByVal Inspector As Inspector)
  Select Case Inspector.CurrentItem.Class
    Case olAppointment
      Set GAppointmentItem = Inspector.CurrentItem
  End Select
End Sub

Private Sub GAppointmentItem_Open(Cancel As Boolean)
  Select Case GAppointmentItem.AllDayEvent
    Case True
      GAppointmentItem.BusyStatus = olBusy
  End Select
End Sub

Private Sub GAppointmentItem_PropertyChange(ByVal Name As String)
  If Name = "AllDayEvent" Then
    Select Case GAppointmentItem.AllDayEvent
      Case True
        GAppointmentItem.BusyStatus = olBusy
    End Select
  End If
End Sub

3. Сохраните код VBA и перезапустите Outlook.

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

Статьи по теме

---

Лучшие инструменты для офисной работы

Kutools for Outlook - Более 100 мощных функций для улучшения вашего Outlook

🤖 Почтовый помощник с искусственным интеллектом: Мгновенные профессиональные электронные письма с помощью магии искусственного интеллекта: гениальные ответы одним щелчком мыши, идеальный тон, многоязычное владение. Преобразуйте электронную почту без особых усилий! ...

???? Автоматизация электронной почты: Нет на месте (доступно для POP и IMAP)  /  Расписание отправки писем  /  Автоматическое копирование/скрытая копия по правилам при отправке электронной почты  /  Автопересылка (расширенные правила)   /  Автоматическое добавление приветствия   /  Автоматически разделять электронные письма от нескольких получателей на отдельные сообщения ...

📨 Управление электронной почтой: Легко вспоминать электронные письма  /  Блокировка мошеннических писем от субъектов и других лиц  /  Удалить повторяющиеся электронные письма  /  Поиск  /  Объединение папок ...

📁 Вложения Pro: Пакетное сохранение  /  Пакетное отсоединение  /  Пакетное сжатие  /  Автосохранение   /  Авто отсоединение  /  Автоматическое сжатие ...

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

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

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

Более Особенности 100 Ждем вашего исследования! Нажмите здесь, чтобы узнать больше.

Узнать больше       Бесплатная загрузка      покупка