Kako prilagoditi veličinu i položaj prozora Outlook Note s VBA

Kada otvorite bilješku, prozor bilješke će uvijek biti otvoren u maloj veličini i nalazit će se blizu gornjeg lijevog ugla Outlook prozora. Možda ćete htjeti prilagoditi veličinu i poziciju prozora bilješke. Sada će vam ovaj članak pomoći da to postignete.

Podrazumevano, Outlook bilješka se uvijek otvara u maloj veličini. Ipak, većinu vremena, sadržaj bilješke je prilično dugačak. U tom slučaju, morate ručno podesiti veličinu. Osim veličine prozora, položaj prozora je također uznemirujući problem. Prozor bilješke se također nalazi blizu gornjeg lijevog ugla. Većina korisnika zapravo želi da prozor bude u sredini. Ukratko, mnogi korisnici žele prilagoditi veličinu i položaj prozora bilješke. Dakle, ovdje ćemo podijeliti način kako to postići.

Prilagodite veličinu i poziciju prozora Outlook Note

1. Na samom početku pokrenite svoju Outlook aplikaciju.
2. Zatim pritisnite “Alt + F11” da pokrenete Outlook VBA editor.
3. U sledećem prozoru „Microsoft Visual Basic za aplikacije“, kopirajte sledeći kod u projekat „ThisOutlookSession“.

Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objNoteInspector As Outlook.Inspector

Private Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

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

'When a Note window opens
Private Sub objNoteInspector_Activate()
    With objNoteInspector
         .WindowState = olNormalWindow
         '".Height" and ".Width" used to customize the size of Note Window
         .Height = 300
         .Width = 600
         '".Left" and ".Top" used to specify the position of Note Window
         .Left = 200
         .Top = 200
    End With
End Sub

Bilješka: Izmijenite vrijednosti “Visina”, “Širina”, “Lijevo” i “Vrh” prema vašim željama na osnovu komentara u kodu.

4. Nakon toga, pomaknite kursor u potprogram "Application_Startup".
5. Na kraju, pritisnite dugme “F5” da aktivirate novi makro.
6. Od sada, svaki put kada otvorite bilješku, njen prozor će se prikazati u prilagođenoj veličini i prilagođenoj poziciji, kao što je prikazano na sljedećem snimku ekrana.

Riješite uznemirujuće probleme sa Outlookom

Možda ste se suočili s brojnim problemima s Outlookom, od sitnih, beznačajnih poruka o grešci do katastrofalnih problema s Outlook podacima. Suočeni s njima, koje ćete mjere poduzeti? Iskreno, mali problemi se mogu lako riješiti onemogućavanjem dodataka trećih strana, pokretanjem u sigurnom načinu rada ili ponovnim kreiranjem profila pošte itd. Međutim, ako je problem ozbiljan Outlook korupcija, morate pribjeći alatu za popravku. Prvo možete isprobati interni uslužni program. Ako ne uspije, nemojte se obeshrabriti. Vrijeme je da pozovete robusniji vanjski alat, npr DataNumen Outlook Repair.

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 SQL Server Popravak i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com