Pentru elementele din calendar care sunt afișate ca „Gratuit” sau „Provativ”, poate doriți să eliminați mementourile acestora. Acum, în acest articol, vom introduce 2 metode care vă pot permite să-l obțineți în vrac.
Poate ați configurat o oră de memento implicită pentru toate elementele din calendar. În acest caz, indiferent de articolele ocupate, în afara biroului, gratuite sau provizorii, acestea vor avea întotdeauna activat un memento. Cu toate acestea, de obicei, articolele gratuite și provizorii de fapt nu necesită memento-uri. Prin urmare, doriți să eliminați în serie mementourile de la astfel de articole. Așadar, aici vă vom învăța 2 mijloace pentru a realiza asta dintr-o singură mișcare.
Metoda 1: Eliminare manuală în lot într-un calendar
- În primul rând, deschideți un calendar.
- Apoi, treceți la fila „Vizualizare” și faceți clic pe „Schimbați vizualizarea” > „Lista”.
- Apoi, faceți clic pe butonul „Vizualizare setări”.
- În caseta de dialog pop-up, apăsați butonul „Grupați după”.
- După aceea, într-un alt dialog nou, selectați „Memento” în „Grupați articole după” și faceți clic pe „OK”.
- Mai târziu, faceți clic pe butonul „Coloane”.
- În dialogul „Afișați coloanele”, adăugați coloana „Afișați ora ca” și apăsați „OK”.
- Ulterior, faceți clic pe „OK” pentru a salva setările de vizualizare.
- În lista de articole din calendar, găsiți și selectați toate elementele gratuite/provizorii din grupul „Memento: da”.
- În cele din urmă, trageți și plasați-le în grupul „Memento: Nu”.
Metoda 2: Eliminare lot în toate calendarele cu VBA
- În primul rând, apăsați „Alt + F11” pentru a declanșa editorul VBA.
- Apoi, copiați codul VBA de mai jos într-un modul.
Sub RemoveReminders_TentativeCalendarItems() Dim objStore ca Outlook.Store Dim objFolder ca Outlook.Folder Pentru fiecare objStore din Application.Session.Stores „Procesează toate folderele Calendar pentru fiecare objFolder din objStore.GetRootFolder.Folders Dacă obj =FolderOldPolder. jFolder ) End If Next Next End Sub ProcessFolders(ByVal objCalendar As Outlook.Folder) Dim i As Long Dim objAppointment As Outlook.AppointmentItem Dim objSubCalendar As Outlook.Folder 'Eliminați mementourile din articolele gratuite/Tentative ale calendarului pentru i = objCounter.Items. La 1 pas -1 set objappointment = objcalendar.items (i) dacă objappointment.busyStatus = olfree sau objappointment.busyStatus = oltentative, atunci dacă objappointment.reminderset = true atunci objappointment.remindetset = false objappointment.save se termină dacă se încheie procesul următor Recursiv Dacă objCalendar.Folders.Count > 0 Atunci pentru fiecare objSubCalendar din objCalendar.Folders Apelați ProcessFolders(objSubCalendar) Next End If End Sub
- Apoi, mutați cursorul în prima subrutină.
- În cele din urmă, apăsați tasta „F5”.
- Deodată, toate mementourile pentru elementele din calendar gratuite sau provizorii vor fi eliminate.
Faceți față problemelor perturbatoare ale Outlook
Este destul de obișnuit să întâmpinați diverse probleme în Outlook, cum ar fi deteriorarea fișierelor PST, infecția cu viruși, ștergerea accidentală a articolelor etc. reparație PST instrument în apropiere, cum ar fi DataNumen Outlook Repair. Vă poate salva de la pierderea enervantă de date din Outlook.
Introducerea autorului:
Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv repara mdf și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com