Flere brukere lengter etter en løsning for å batchmerke alle e-poster som lest i alle Outlook-mapper. I denne artikkelen vil vi introdusere en slik metode for deg.
Som vi alle vet, er det enkelt å merke alle e-poster i en mappe som lest. Bare velg og høyreklikk på mappen og velg deretter "Merk alle som lest" i hurtigmenyen. Imidlertid, hvis det er flere mapper som har uleste e-poster, må du utføre på mappene én etter én. Det er for plagsomt. Derfor vil vi her dele deg en mye mer effektiv måte, som lar deg realisere det i bulk.
Batchmerk alle e-poster som lest i alle Outlook-mapper
- Til start med, start Outlook-applikasjonen.
- Trykk deretter "Alt + F11" for å få tilgang til Outlook VBA-editor.
- Deretter, i "Microsoft Visual Basic for Applications"-vinduet, kopierer du koden nedenfor til en ubrukt modul.
Sub MarkAllItemsAsRead() Dim objStores As Outlook.Stores Dim objStore As Outlook.Store Dim objOutlookFile As Outlook.Folder Dim objFolder As Outlook.Folder 'Behandle alle Outlook-filer Set objStores = Outlook.Application.Session.Stores For Every objStore Sett objOutlookFi = objStore.GetRootFolder For hver objFolder In objOutlookFile.Folders 'Behandle e-postmapper If objFolder.DefaultItemType = olMailItem Deretter kaller ProcessFolders(objFolder) End If Next Next End Sub ProcessFolders(ByVal objCurFolder) AsIt Outlook DimenIt. i As Integer Dim objItem As Object Dim objSubFolder As Outlook.Folder Set objUnreadItems = objCurFolder.Items.Restrict("[Unread]=True") 'Merk alle uleste e-poster som lest For i = 1 To objUnreadItems.Count Set objItem = objUnreadIt. Item(i) objItem.UnRead = False objItem.Save Next 'Behandle undermapper rekursivt If objCurFolder.Folders.Count > 0 Then For Every objSubFolder In objCurFolder.Folders Call ProcessFolders(objSubFolder) Next End If End SubFolder
- Etterpå setter du markøren inn i den første subrutinen.
- Deretter trykker du på "F5"-tasten eller klikker på "Kjør"-ikonet i verktøylinjen.
- Til slutt, etter at makroen er fullført, kan du gå tilbake til e-postmappelisten.
- Der vil du se at alle uleste e-poster er merket som lest, som vist på skjermbildet.
Flykt fra miserable Outlook-datatap
Brukere kan ha akseptert et faktum at Word-dokumenter og Excel-arbeidsbøker lett kan bli ødelagt. Faktisk, i likhet med disse filene, er Outlook-datafilen også utsatt for skade. Derfor, hvis du er motvillig til å oppleve det, bør du ta noen handlinger. Det bør inkludere forholdsregler, som regelmessig sikkerhetskopiering og blokkering av all skadelig programvare eller virus, og noen hjelpetiltak, som å vite hvordan du starter reparasjonsverktøyet for innboks, scanpst og beholde et kraftig eksternt fikseverktøy, som f.eks DataNumen Outlook Repair.
Forfatterintroduksjon:
Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert reparere mdf og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med