Så här får du snabbt en lista över de påskyndade påminnelserna i din Outlook

Efter att ha pausat påminnelser kan det vara svårt att räkna ut de snoozed bland alla påminnelser. Nu, i den här artikeln, kommer vi att lära dig hur du snabbt kan få en lista med snoozed påminnelser i din Outlook.

När en påminnelse dyker upp i Outlook kan du välja att avvisa eller snooze den. Most om du för närvarande inte har tid att hantera det associerade objektet när en påminnelse varnar dig, väljer du att pausa påminnelsen under en viss tid, till exempel 5 minuter, 1 timme, etc. kommer att upptäcka att det är lite svårt att hitta de snoozed påminnelserna. I det här fallet längtar du efter en lösning som låter dig ta reda på alla snoozed påminnelser på en gång. Därefter kommer vi att dela dig ett sätt.

Skaffa en lista över de påskyndade påminnelserna

1. För somtarstarta din Outlook-applikation.
2. Sedan, efter att ha kommit in i huvudfönstret i Outlook, borde du trycka på “Alt + F11” -knapparna.
3. Därefter får du tillgång till VBA-redigeringsfönstret framgångsrikt.
4. Nu måste du hitta en oanvänd modul.
5. Kopiera sedan och klistra in följande VBA-kod i den här modulen.

Sub GetListofSnoozedReminders()
    Dim objReminder As Outlook.Reminder
    Dim objReminders As Outlook.Reminders
    Dim strList As String
    Dim i As Long
    Dim objNote As Outlook.NoteItem
    
    'Get all the reminders in Outlook
    Set objReminders = Outlook.Reminders
 
    i = 1
    For Each objReminder In objReminders
        'Get the snoozed reminders
        If (objReminder.OriginalReminderDate <> objReminder.NextReminderDate) = True Then
            strList = strList & i & ". " & objReminder.Caption & " (" & Replace(TypeName(objReminder.Item), "Item", "") & ")" & vbCrLf & " Snoozed to " & objReminder.NextReminderDate & vbCrLf & vbCrLf
           i = i + 1
        End If
    Next objReminder
  
    'Display the list of snoozed reminders in a Note
    Set objNote = Outlook.Application.CreateItem(olNoteItem)
    With objNote
         .Body = "Snoozed Reminders" & vbCrLf & vbCrLf & strList
         .Display
    End With
End Sub

6. Därefter kan du köra detta makro genom att klicka på "Kör" -ikonen i verktygsfältet eller genom att trycka på "F5" -tangentknappen.
7. Så småningom kommer ett nytt anteckningsobjekt att visas i bakgrunden. Det visas som följande skärmdump:
8. Om du vill skriva ut det här objektet kan du hitta det i mappen "Anteckningar". Gå sedan till "Arkiv" -menyn, växla till "Skriv ut" -fliken och tryck på "Skriv ut" -knappen.

Kom tillbaka på ett mäktigare reparationsverktyg

Som vi alla vet är Outlook utrustat med ett inbyggt reparationsverktyg. Om du ställs inför små problem kan du använda det. Ändå, om du stöter på komplexa problem, skulle du bättre ta hjälp av andra externa verktyg, till exempel DataNumen Outlook Repair. Det kan fixa olika Outlook-problem och återställa PST data med utmost lätthet oavsett hur extremt PST-filen skadas.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive korrupt mdf och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com