Ha gyorsan szeretné módosítani az összes találkozót, amely „Felvételes” állapotúként jelenik meg, „Foglalt” állapotra, tekintse meg ezt a cikket. Itt megosztunk veled 2 módszert, amelyekkel ez kötegekben valósítható meg.
Egyes felhasználók találkoztak olyan esettel, hogy miután importálták a találkozókat az Outlookjukba, mindegyik „Felvételes” állapotként jelenik meg. De „Foglalt”-ként akarják megmutatni őket. Ebben a helyzetben az alábbi 2 módszer egyikét használhatja ennek eléréséhez.

1. módszer: Foglalt találkozók húzása a „Foglalt” csoportba
- Először indítsa el az Outlook alkalmazást.
- Ezután lépjen be a „Naptár” területre a „Ctrl + 2” gombok megnyomásával.
- Ezután nyisson meg egy Naptár mappát.
- Ezután váltson a „Nézet” fülre, és válassza a „Nézet módosítása” > „Lista” lehetőséget.
- Később kattintson a „Beállítások megtekintése” gombra.
- A felugró „Speciális nézetbeállítások” párbeszédpanelen nyomja meg a „Csoportosítás” gombot.
- Ezt követően a „Csoportosítás alapja” mezőben válassza ki az „Idő megjelenítése mint” lehetőséget az „elemek csoportosítása szerint” mezőben.
- Ezután kattintson egy sor „OK” gombra az összes párbeszédpanel bezárásához.
- Ezután az előjegyzési listában láthatja, hogy az összes találkozót különböző csoportokba osztották állapotuk alapján.
- Ezen a ponton kattintson a „Megjelenítési idő mint: feltételes” csoportfejlécre.
- Végül húzza át ezt a csoportot az „Idő megjelenítése: foglalt” csoportba, az alábbi képernyőképhez hasonlóan:
- Egyszerre az összes előzetes találkozó „Foglalt” állapotra változott.
2. módszer: Kötegelt módosítás az Outlook VBA segítségével
- Mert minttart, az Outlook programban nyomja meg az „Alt + F11” billentyűket.
- Ezután a következő VBA-szerkesztő ablakban nyisson meg egy nem használt modult.
- Ezután másolja be a következő VBA-kódot ebbe a modulba.
'Change all tentative appointments in all calendar folders to Busy status
Sub BatchChangeAllTenativeAppointments2Busy()
Dim objStores As Outlook.Stores
Dim objStore As Outlook.store
On Error Resume Next
Set objStores = Outlook.Application.Session.Stores
For Each objStore In objStores
Call ProcessFolders(objStore.GetRootFolder.Folders)
Next
End Sub
Sub ProcessFolders(ByVal objFolders As Folders)
Dim objFolder As Outlook.Folder
Dim objAppointment As Outlook.AppointmentItem
For Each objFolder In objFolders
If objFolder.DefaultItemType = olAppointmentItem Then
For Each objAppointment In objFolder.Items
With objAppointment
If .BusyStatus = olTentative Then
.BusyStatus = olBusy
.Save
End If
End With
Next
Call ProcessFolders(objFolder.Folders)
End If
Next
End Sub
- Végül elindíthatja ezt a makrót az F5 billentyű lenyomásával vagy a „Futtatás” ikon megnyomásával az eszköztáron.
- A makró befejezése után az összes naptármappában lévő összes ideiglenes találkozó „Foglalt” állapotra változik.
Időben tisztítsa meg a régi Outlook-elemeket
Köztudott, hogy minél nagyobb az Outlook adatfájlja, annál könnyebben sérülhet meg a fájl. Ezért tanácsos rendszeresen kitakarítani az Outlook régi és használhatatlan elemeit. Ellenkező esetben az idő múlásával a PST-fájl túlméretezett lesz, és megsérülhet. Ekkor minden tőle telhetőt megtesz a PST-adatok visszaállítására, amit nem lehet egyszerű postafiók javító eszköz. Használnia kell egy tapasztalt harmadik féltől származó eszközt, mint pl DataNumen Outlook Repair.
Szerző Bevezetés:
Shirley Zhang adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve SQL helyreállítása és outlook javítószoftver termékek. További információért látogasson el www.datanumen.com


