Перейти к содержимому

Kutools для Office — один пакет. Пять инструментов. Выполняйте больше.

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

Author Siluvia Last modified

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

changing the all-day event default to busy in Outlook

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

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

1. Перейдите в представление «Календарь». Нажмите «Главная» > «Новая встреча».

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

Примечание: Если вкладка «Разработчик» не отображается на ленте, пожалуйста, следуйте инструкциям в этой статье, чтобы показать её.

steps on changing the all-day event default to busy by creating a custom form

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

steps on changing the all-day event default to busy by creating a custom form

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

steps on changing the all-day event default to busy by creating a custom form

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

steps on changing the all-day event default to busy by creating a custom form

6. В диалоговом окне «Свойства» вам необходимо выполнить следующие настройки.

6.1) Перейдите на вкладку «Значение»;
6.2) В разделе «Начальное значение» установите флажок «Установить начальное значение этого поля на»;
6.3) Введите значение «True» в текстовое поле;
6.4) Нажмите кнопку «OK». См. скриншот:
steps on changing the all-day event default to busy by creating a custom form

7. Щелкните правой кнопкой мыши выпадающий список поля «Показывать время как» и выберите «Свойства» из контекстного меню.

steps on changing the all-day event default to busy by creating a custom form

8. В диалоговом окне «Свойства» вам необходимо выполнить следующие настройки.

8.1) Перейдите на вкладку «Значение»;
8.2) В разделе «Начальное значение» установите флажок «Установить начальное значение этого поля на»;
8.3) Введите число «2» в текстовое поле;
8.4) Нажмите кнопку «OK». См. скриншот:
steps on changing the all-day event default to busy by creating a custom form

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

steps on changing the all-day event default to busy by creating a custom form

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

10.1) Выберите целевую папку для пользовательской формы в раскрывающемся списке «Искать в». Здесь я выбираю элемент «Личная библиотека форм»;
10.2) Укажите имя пользовательской формы в текстовом поле «Отображаемое имя»;
10.3) Нажмите кнопку «Опубликовать». См. скриншот:
steps on changing the all-day event default to busy by creating a custom form

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

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

steps on changing the all-day event default to busy by creating a custom form

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


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

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

1. Запустите Outlook, одновременно нажмите клавиши «Alt» + «F11», чтобы открыть окно «Microsoft Visual Basic for Applications».

2. В окне «Microsoft Visual Basic for Applications» дважды щелкните на «Project1» > «Объекты Microsoft Outlook» > «ThisOutlookSession», чтобы открыть окно «ThisOutlookSession (Code)», а затем скопируйте следующий код в это окно кода.

steps on changing the all-day event default to busy by using VBA

Код 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.

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

steps on changing the all-day event default to busy by using VBA

Связанные статьи

Изменение времени напоминания по умолчанию для событий на весь день в Outlook
Обычно время напоминания по умолчанию для событий на весь день составляет 18 часов в Outlook 2007/2010 и 0.5 дня в Outlook 2013. Иногда время напоминания по умолчанию для событий на весь день может не соответствовать вашему рабочему графику. Здесь мы представим способ изменения времени напоминания по умолчанию для событий на весь день в Microsoft Outlook.

Изменение времени последующего действия по умолчанию в Outlook
Как известно, когда мы добавляем напоминание о последующем действии для электронной почты в Outlook, время последующего действия по умолчанию — 16:30 (или другое время в зависимости от вашего рабочего времени). Однако вы можете захотеть изменить время последующего действия по умолчанию и получать напоминания в начале рабочего дня, например, в 9:00. В этой статье я покажу вам, как изменить время последующего действия по умолчанию в Outlook.

Изменение расположения архива по умолчанию в Outlook
По умолчанию Outlook имеет стандартное расположение для файлов архива. Кроме стандартного расположения, вы можете задать собственное место для хранения архивных файлов. В этом руководстве мы покажем вам, как изменить расположение архива по умолчанию в Outlook подробно.

Изменение расположения сохранения вложений по умолчанию в Outlook
Надоело каждый раз искать указанное расположение вложений при запуске Outlook? В этом руководстве мы покажем вам, как изменить расположение сохранения вложений по умолчанию. После этого указанная папка для сохранения вложений будет открываться автоматически каждый раз, когда вы сохраняете вложения, даже если вы перезапустите Outlook.

Изменение времени по умолчанию для отложенной отправки в Outlook
Это руководство предоставляет код VBA, который поможет вам изменить время по умолчанию для функции отложенной отправки в Outlook.


Лучшие инструменты для повышения продуктивности работы с Office

Срочные новости: бесплатная версия Kutools для Outlook уже доступна!

Оцените обновленный Kutools для Outlook с более чем100 невероятными функциями! Нажмите, чтобы скачать прямо сейчас!

🤖 Kutools AI : Использует передовые технологии искусственного интеллекта для легкой работы с Email — включая Ответ, Резюме, Оптимизацию, Расширение, Перевод и Составление писем.

📧 Автоматизация Email: Автоответчик (Доступно для POP и IMAP) / Запланировать отправку писем / Авто Копия/Скрытая копия по правилам при отправке писем / Автоматическое перенаправление (Расширенное правило) / Автоматически добавить приветствие / Авторазделение Email с несколькими получателями на отдельные письма ...

📨 Управление Email: Отозвать письмо / Блокировать вредоносные письма по теме и другим критериям / Удалить дубликаты / Расширенный Поиск / Организовать папки ...

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

🌟 Волшебство интерфейса: 😊Больше красивых и стильных эмодзи / Напоминание при поступлении важных писем / Свернуть Outlook вместо закрытия ...

👍 Удобные функции одним кликом: Ответить всем с вложениями / Антифишинговая Email / 🕘Показать часовой пояс отправителя ...

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

Используйте Kutools на вашем языке – поддерживаются Английский, Испанский, Немецкий, Французский, Китайский и более40 других!

Мгновенно активируйте Kutools для Outlook одним кликом. Не ждите – скачайте и улучшите свою эффективность прямо сейчас!

kutools for outlook features1 kutools for outlook features2

🚀 Скачайте все дополнения 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