2 Metódy na zmenu predvoleného trvania schôdzky a schôdzky v programe Outlook

Predvolene je pri vytváraní schôdzky alebo schôdzky predvolená doba trvania pol hodiny. Ak to chcete zmeniť, môžete si prečítať dve metódy uvedené v tomto článku.

Ako vidíte, pri vytváraní novej schôdzky alebo stretnutia sa trvanie novej položky automaticky nastaví na 30 minút. V skutočnosti to však pre väčšinu používateľov nie je vhodné. Preto by si mnoho ľudí chcelo zmeniť predvolené trvanie schôdzky a stretnutia podľa vlastných preferencií. S ohľadom na túto požiadavku vás tu naučíme 2 spôsoby. Čítajte ďalej a oboznámte sa s nimi podrobnejšie.

Metóda 1: Zmena časovej stupnice

1. Ak chcete začať, spustite Outlook.
2. Potom sa obráťte na tablu „Kalendár“ a otvorte požadovaný priečinok kalendára.
3. Ďalej sa obráťte na kartu „Zobraziť“ a vyberte „Zmeniť zobrazenie“> „Kalendár“.
4. Následne kliknite na tlačidlo „Zobraziť nastavenia“.
5. V rozbaľovacom dialógovom okne „Rozšírené nastavenia zobrazenia: Kalendár“ kliknite na tlačidlo „Ďalšie nastavenia“.
6. V nasledujúcom dialógovom okne potom môžete zmeniť časovú mierku. Vyberte časové obdobie podľa požadovaného trvania. Tu je iba 6 možností.
7. Potom kliknite na niekoľko tlačidiel „OK“, aby ste zatvorili všetky dialógové okná.
8. Odteraz, keď vytvoríte novú schôdzku alebo schôdzku, bude predvolené trvanie rovnaké ako vami vybrané časové rozpätie.

Tento priemer má však dve najväčšie nevýhody. Jednou z nich je, že máte na výber iba 2 možností. Trvanie nemôžete ľubovoľne určiť. Druhá je, že to môže fungovať iba v zobrazení „Kalendár“. Ak prejdete na iné zobrazenie, trvanie sa vráti späť na pol hodiny. Prejdite teda na ďalšiu metódu, ktorá sa týchto nedostatkov zbaví.

Metóda 2: Zmena pomocou VBA

1. Na prvom mieste stlačte v okne programu Outlook klávesové skratky „Alt + F11“.
2. Potom v ďalšom okne editora VBA otvorte projekt „ThisOutlookSession“.
3. Ďalej skopírujte a vložte do nich nasledujúce kódy 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. Potom podpíšte tento kód.
5. Potom zmeňte nastavenia makra tak, aby umožňovali digitálne podpísané makrá.
6. Nakoniec reštartujte Outlook, aby ste aktivovali makro.
7. Potom sa doba vymenovania a stretnutia nastaví na rovnakú dĺžku, ako je stanovená v kódoch VBA, ako je to na nasledujúcom obrázku.

Zabráňte bolestivej strate dát z Outlooku

Nikto nie je ochotný utrpieť stratu údajov aplikácie Outlook PST. Preto, ak sa chcete zbaviť frustrujúcej straty dát PST, musíte urobiť 2 požadované preventívne opatrenia. Jedným z nich je konzistentné a aktuálne zálohovanie údajov PST. Druhou je zmocniť sa renomovaného nástroja na opravu, ako je napr DataNumen Outlook Repair, ktorý môže opraviť PST problémy efektívne.

Úvod autora:

Shirley Zhang je expertkou na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane poškodenie mdf a výhľadové softvérové ​​produkty na opravu. Pre viac informácií navštívte www.datanumen. S