По умолчанию статус мероприятия на весь день — «Свободно». Но на самом деле мы обычно надеемся установить статус «Занят». Поэтому эта статья покажет вам 2 подхода к его реализации.
Многих пользователей раздражает то, что Outlook по умолчанию показывает событие на весь день как «Бесплатное». Таким образом, им приходится каждый раз вручную менять статус при создании события на весь день. Несомненно, это довольно хлопотно. Следовательно, здесь мы представим 2 совета, чтобы автоматически установить статус события на весь день на «Занят».

Метод 1: Создайте собственную форму «Занят весь день»
- К start с, запустите свой Outlook.
- Затем перейдите на панель навигации «Календарь».
- Затем вы можете создать новую встречу, нажав кнопку «Новая встреча» на ленте.
- В окне «Назначение» перейдите на вкладку «Разработчик» и нажмите кнопку «Создать эту форму».
- После этого необходимо перейти на страницу «P.2».
- Позже из всплывающего диалогового окна «Выбор поля» перетащите поля «Событие на весь день» и «Показать время как» на страницу «P.2».
- Затем щелкните правой кнопкой мыши поле «Событие на весь день» и выберите пункт «Свойства» в контекстном меню.
- Во всплывающем диалоговом окне перейдите на вкладку «Значение», включите «Установить начальное значение этого поля в», а затем введите «Истина» в поле ниже.
- Затем нажмите «ОК», чтобы сохранить изменения.
- После этого щелкните правой кнопкой мыши поле со списком рядом с полем «Показать время как» и выберите «Свойства».
- В следующем диалоговом окне перейдите на вкладку «Значение», установите флажок «Установить начальное значение этого поля» и затем введите «2» в поле ниже.
- Позже нажмите «ОК», чтобы вернуться к форме.
- Наконец, вы можете нажать кнопку «Опубликовать» на ленте и выбрать «Опубликовать форму как». В новом диалоговом окне введите имя в поле «Отображаемое имя» и, наконец, нажмите кнопку «Опубликовать».
- Отныне каждый раз, когда вы можете щелкнуть, чтобы создать мероприятие «Занято на весь день», вы можете нажать «Новый элемент»> «Выбрать форму»> «События «Занято на весь день».
Если вы чувствуете, что это не так удобно, как хотелось бы, вы можете выбрать следующий способ, который использует VBA.
Способ 2: автоматическая установка события на весь день на «Занято» через VBA
- К starт с, в главном окне Outlook нажмите клавиши «Alt + F11».
- Получив доступ к редактору Outlook VBA, откройте окно проекта ThisOutlookSession.
- Затем скопируйте следующий код VBA в этот проект.
Private WithEvents objInspectors As Inspectors
Private WithEvents objAppointment As AppointmentItem
Private Sub Application_Startup()
Set objInspectors = Outlook.Application.Inspectors
End Sub
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If TypeName(Inspector.CurrentItem) = "AppointmentItem" Then
Set objAppointment = Inspector.CurrentItem
End If
End Sub
'Occur when opening an appointment
Private Sub objAppointment_Open(Cancel As Boolean)
If objAppointment.AllDayEvent = True Then
objAppointment.BusyStatus = olBusy
End If
End Sub
'Occur when changing an appointment
Private Sub objAppointment_PropertyChange(ByVal Name As String)
If Name = "AllDayEvent" Then
'If you set the appointment to all day event
If objAppointment.AllDayEvent = True Then
objAppointment.BusyStatus = olBusy
End If
End If
End Sub
- После этого подпишите этот код и измените настройки макроса Outlook.
- В конце концов, резtart ваше приложение Outlook, чтобы активировать этот новый проект.
- С тех пор каждый раз, когда вы создаете мероприятие на весь день, его статус будет автоматически устанавливаться на «Занят».
Защитите свои данные Outlook
Без сомнения, вокруг Outlook существует множество потенциальных угроз безопасности. Таким образом, защитить наши данные Outlook довольно обременительно и сложно. Мы должны все время быть начеку. Кроме того, чтобы вовремя принять меры по оказанию помощи, мы должны получить PST-исправление инструмент, как DataNumen Outlook Repair.
Об авторе:
Ширли Чжан — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая ремонт мдф и программные продукты для ремонта Outlook. Для получения дополнительной информации посетите www.datanumen.com






