2 методи для зміни тривалості призначення та зустрічі за замовчуванням у програмі Outlook

За замовчуванням, коли ви створюєте зустріч або зустріч, тривалість за замовчуванням встановлюється на півгодини. Якщо ви хочете змінити його, ви можете звернутися до 2 методів, представлених у цій статті.

Як бачите, під час створення нової зустрічі або наради тривалість нового елемента автоматично встановлюється на 30 хвилин. Однак насправді це не підходить для більшості користувачів. Тому багато людей хотіли б змінити тривалість зустрічі та наради за замовчуванням на власний розсуд. Зосереджуючись на цій вимозі, тут ми розповімо вам про 2 способи. Читайте далі, щоб ознайомитися з ними детальніше.

Спосіб 1: Зміна часового масштабу

1. Для початку запустіть Outlook.
2. Потім перейдіть до панелі «Календар» і відкрийте потрібну папку календаря.
3. Потім перейдіть на вкладку "Вид" і виберіть "Змінити вид"> "Календар".
4. Згодом натисніть кнопку “View Settings”.
5. У спливаючому діалоговому вікні «Додаткові параметри перегляду: Календар» натисніть кнопку «Інші налаштування».
6. Потім у наступному діалоговому вікні ви можете змінити масштаб часу. Виберіть період часу, виходячи з бажаної тривалості. Тут є лише 6 варіантів.
7. Після цього натисніть кілька кнопок «OK», щоб закрити всі діалогові вікна.
8. Відтепер, коли ви створюєте нову зустріч або зустріч, тривалість за замовчуванням буде такою ж, як вибраний вами часовий масштаб.

Однак це середнє має 2 найбільші недоліки. Один з них полягає в тому, що вам доступно лише 6 варіантів. Ви не можете вказати тривалість за бажанням. Інший - це може працювати лише у поданні “Календар”. Якщо перейти на інший вигляд, тривалість буде до півгодини. Отже, переходьте до наступного методу, який може позбутися цих недоліків.

Спосіб 2: Зміна через VBA

1. В першу чергу натисніть вікно “Alt + F11” у вікні Outlook.
2. Потім у наступному вікні редактора VBA відкрийте проект “ThisOutlookSession”.
3. Далі скопіюйте та вставте в нього такі коди VBA.

Private WithEvents objInspectors As Outlook.Inspectors
Private WithEvents objAppointment As Outlook.AppointmentItem
 
Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is AppointmentItem Then
       Set objAppointment = Inspector.CurrentItem
    End If
End Sub

Private Sub objAppointment_Open(Cancel As Boolean)
    'Set the default duration of new appointment
    If objAppointment.CreationTime = #1/1/4501# Then
       objAppointment.Duration = "50"
    End If
End Sub

Private Sub objAppointment_PropertyChange(ByVal Name As String)
    'When you disable the "All Day Event"
    'Change the default duration of the current appointment
    If Name = "AllDayEvent" Then
       If objAppointment.AllDayEvent = False Then
          objAppointment.Duration = "50"
       End If
    End If
End Sub

4. Після цього підпишіть цей код.
5. Потім змініть параметри макросів, щоб дозволити макроси з цифровим підписом.
6. Нарешті перезавантажте Outlook, щоб активувати макрос.
7. Після цього тривалість зустрічі та зустрічі буде встановлена ​​рівною визначеній довжині в кодах VBA, як на наступному зображенні.

Уникайте болісної втрати даних Outlook

Ніхто не готовий страждати від втрати даних Outlook PST. Отже, якщо ви хочете позбутися неприємних втрат даних PST, вам слід виконати 2 необхідні заходи обережності. Одним із них є послідовні та сучасні резервні копії даних PST. Інший - заручитися надійним інструментом виправлення, таким як DataNumen Outlook Repair, які можуть виправити PST проблеми ефективно.

Вступ автора:

Ширлі Чжан - експерт із відновлення даних у DataNumen, Inc., яка є світовим лідером у галузі технологій відновлення даних, в тому числі пошкодження mdf та перспективні програмні продукти для ремонту. Для отримання додаткової інформації відвідайте WWW.datanumen.com