Kako brzo dobiti popis odgođenih podsjetnika u vašem Outlooku

Nakon odgode podsjetnika, možda će vam biti malo teško među svim podsjetnicima pronaći one odgođene. Sada ćemo vas u ovom članku naučiti kako brzo dobiti popis odgođenih podsjetnika u svom Outlooku.

Kada se podsjetnik pojavi u Outlooku, možete ga odbaciti ili odgoditi. Većinu vremena, ako trenutno nemate vremena baviti se povezanom stavkom kada vas podsjetnik upozori, odabrat ćete odgodu podsjetnika na određeno vrijeme, na primjer 5 minuta, 1 sat itd. Međutim, nakon što ga odgodite, bit će vam malo teže pronaći odgođene podsjetnike. U tom slučaju, žudjet ćete za rješenjem koje vam omogućuje da odjednom pronađete sve odgođene podsjetnike. Stoga ćemo vam u nastavku pokazati kako.

Dobijte popis odgođenih podsjetnika

1. Za početak, pokrenite Outlook aplikaciju.
2. Zatim, nakon što uđete u glavni prozor Outlooka, trebate pritisnuti tipke "Alt + F11".
3. Nakon toga ćete uspješno dobiti pristup prozoru uređivača VBA.
4. Sada morate pronaći neiskorišteni modul.
5. Zatim kopirajte i zalijepite sljedeći VBA kod u ovaj modul.

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. Nakon toga možete pokrenuti ovu makronaredbu klikom na ikonu "Pokreni" na alatnoj traci ili pritiskom na tipku "F5".
7. Na kraju će se u pozadini prikazati nova stavka bilješke. Prikazat će se kao na sljedećoj snimci zaslona:
8. Ako želite ispisati ovu stavku, možete je pronaći u mapi "Bilješke". Zatim idite na izbornik "Datoteka", prebacite se na karticu "Ispis" i pritisnite gumb "Ispis".

Vratite se moćnijem alatu za popravak

Kao što svi znamo, Outlook dolazi obdaren ugrađenim alatom za popravak. Ako se suočite s malim problemima, možete ga koristiti. Ipak, ako naiđete na složene probleme, bolje je da se poslužite drugim vanjskim alatima, kao što je DataNumen Outlook Repair. Može riješiti razne probleme s Outlookom i oporaviti PST podatke s najvećom lakoćom bez obzira na to koliko je PST datoteka oštećena.

Uvod za autora:

Shirley Zhang stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući pokvaren mdf i softverske proizvode za popravak Outlooka. Za više informacija posjetite www.datanumen.com