Dacă doriți să compactați fișierul de date Outlook, în general, veți selecta să utilizați caracteristica „Compact Now” din Outlook. Dar are unele dezavantaje. Astfel, în acest articol, vă vom învăța să faceți un instrument PST compact mai robust prin VBA.
După cum știm cu toții, fișierul Outlook va fi susceptibil la erori și corupție pe măsură ce fișierul devine din ce în ce mai mare. Prin urmare, ar trebui să acordați multă atenție dimensiunii fișierului Outlook pentru a-l păstra în dimensiuni mici. Pe lângă eliminarea elementelor inutile și vechi, puteți compacta și fișierul de date Outlook pentru a-i reduce dimensiunea.
Despre funcția încorporată „Compact Now”.
Poate ați descoperit că Outlook vine cu o caracteristică nativă „Compact Now”. După lansarea programului Outlook, în panoul de navigare prin e-mail, puteți face clic dreapta pe fișierul de date Outlook pe care doriți să îl compactați. Apoi, din meniul contextual, selectați „Proprietăți fișier de date”. Apoi, în caseta de dialog ulterioară, apăsați butonul „Avansat”. Mai târziu, veți putea găsi „Compact Now”. Deși o astfel de caracteristică este la îndemână, are încă multe deficiențe.
Dezavantajul imens este că, dacă fișierul de date Outlook sursă este considerabil de mare, va dura destul de mult timp pentru a realiza procesul de comprimare. În plus, fișierul de date Outlook sursă trebuie să fi fost utilizat de mult timp, astfel încât poate conține o mulțime de erori ascunse. Funcția „Compact Now” nu vă poate ajuta să scăpați de aceste erori interne.
În comparație cu acest utilitar încorporat, un alt instrument PST compact, pe care vă vom învăța să îl faceți în cele ce urmează, nu are aceste dezavantaje. Poate funcționa mult mai rapid chiar dacă fișierul sursă este fulgerător. Acum vă rog să citiți mai departe. Vom expune pașii elaborați și codurile VBA.
Creați un instrument PST compact gratuit pentru fișierul Outlook
- În primul rând, apăsați butoanele tastei „Alt + F11” în fereastra principală a Outlook.
- Apoi puteți deschide un modul care nu este utilizat sau puteți introduce un modul nou.
- Apoi copiați și inserați următoarele coduri VBA în acest modul.
Private Sub CompactPSTFile() Dim objSourceFileFolders As Outlook.Folders Dim objFolder As Outlook.Folder Dim objNewPSTFileFolder As Outlook.Folder „Creați un nou fișier PST în folderul local predefinit și numele de fișier Outlook.Application.Session.AddStore „E:\NewPST. pst" Set objNewPSTFileFolder = Session.Folders.GetLast() 'Obține toate folderele fișierului PST sursă 'Schimbați „Personal” în numele afișat al fișierului PST sursă Set objSourceFileFolders = Outlook.Application.Session.Folders(„Personal”) .Folders pentru fiecare objFolder din objSourceFileFolders objFolder.CopyTo objNewPSTFileFolder Next End Sub
- După aceea, ar trebui să setați nivelul de securitate al macrocomenzii Outlook la scăzut.
- În cele din urmă, puteți declanșa subrutina făcând clic pe pictograma „Run” sau apăsând tasta F5 în fereastra macro,
- Imediat, un nou fișier de date Outlook va apărea în panoul de navigare, care este comprimat din fișierul Outlook sursă.
Evitați coruperea mizerabilă a datelor PST
După cum am menționat la începutul acestui articol, fișierul Outlook PST va fi predispus la corupție atunci când este prea mare. Prin urmare, în afară de a-l păstra în dimensiuni mici, trebuie să-l faceți copii de rezervă în mod regulat. În acest fel, chiar dacă fișierul suferă erori sau corupție, puteți reveni cu ușurință PST corupt datele din copii de rezervă. Va fi foarte convenabil.
Introducerea autorului:
Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv mdf corupt și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com