2 Metode za promjenu zadanog trajanja zakazivanja i sastanka u Outlooku

Podrazumevano, kada kreirate sastanak ili sastanak, podrazumevano trajanje je postavljeno na pola sata. Ako ga želite promijeniti, možete se obratiti na 2 metode predstavljene u ovom članku.

Kao što vidite, kada kreirate novi sastanak ili sastanak, trajanje nove stavke će se automatski postaviti na 30 minuta. Međutim, u stvarnosti, ovo nije prikladno za most korisnika. Stoga bi mnogi ljudi željeli promijeniti zadano trajanje sastanka i sastanka prema vlastitim željama. Fokusirani na ovaj zahtjev, ovdje ćemo vas naučiti 2 načina. Čitajte dalje da biste ih detaljno saznali.

Metoda 1: Promjena vremenske skale

1. Za start sa, pokrenite Outlook.
2. Zatim okrenite na okno “Kalendar” i otvorite željeni folder kalendara.
3. Zatim okrenite na karticu “Prikaz” i odaberite “Promijeni prikaz” > “Kalendar”.
4. Zatim kliknite na dugme „Pregled postavki“.
5. U iskačućem dijaloškom okviru „Napredne postavke prikaza: Kalendar“, kliknite na dugme „Ostale postavke“.
6. Zatim u sljedećem dijaloškom okviru možete promijeniti vremensku skalu. Odaberite vremenski period na osnovu željenog trajanja. Ovdje postoji samo 6 opcija.
7. Nakon toga kliknite na nekoliko dugmadi “OK” da zatvorite sve dijaloške okvire.
8. Od sada, kada kreirate novi sastanak ili sastanak, zadano trajanje će biti isto kao i odabrana vremenska skala.

Međutim, ovo sredstvo ima 2 najveća nedostatka. Jedna je da postoji samo 6 opcija koje možete izabrati. Ne možete odrediti trajanje po želji. Drugi je da ovo može raditi samo u prikazu “Kalendar”. Ako pređete na drugi prikaz, trajanje će se vratiti na pola sata. Stoga prijeđite na sljedeću metodu koja može riješiti ove nedostatke.

Metod 2: Promjena putem VBA

1. Prvo, pritisnite tipke “Alt + F11” u Outlook prozoru.
2. Zatim u sljedećem prozoru VBA editora otvorite projekt “ThisOutlookSession”.
3. Zatim kopirajte i zalijepite sljedeće VBA kodove u njega.

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. Nakon toga, potpišite ovaj kod.
5. Zatim promijenite postavke makroa kako biste dozvolili digitalno potpisane makroe.
6. Konačno restart svoj Outlook da aktivirate makro.
7. Nakon toga, trajanje termina i sastanka će biti podešeno jednako određenoj dužini u VBA kodovima, kao na sljedećoj slici.

Izbjegnite bolni gubitak Outlook podataka

Niko nije voljan da trpi gubitak Outlook PST podataka. Stoga, ako želite da se riješite frustrirajućeg gubitka PST podataka, morate poduzeti 2 potrebne mjere opreza. Jedna je dosljedna i ažurirana sigurnosna kopija PST podataka. Drugi je da nabavite renomirani alat za popravku, kao što je DataNumen Outlook Repair, što može popraviti PST pitanja efikasno.

Uvod za autora:

Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući oštećenje mdf-a i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com