How to Display Next Reminder Time in Task List with Outlook VBA

By default, Outlook doesn’t support users to check the next reminder time after snoozing any reminder. Thus, in this post, we’ll take task reminder as an example, teaching you to display the next reminder time in task list.

After you snooze a task reminder in Outlook, afterwards, you may want to check the next reminder time. You are allowed to add the “Reminder Time” column to the Task list. However, it refers to the original reminder rime, instead of the new reminder time after snooze. If you want to see the next reminder time in the task list, you can use the following way.

Display Next Reminder Time in Task List with Outlook VBA

Display Next Reminder Time in Task List

  1. At the very outset, launch your Outlook program as usual.
  2. Then in the main Outlook screen, press “Alt + F11” key buttons.
  3. Next you’ll get into the “Microsoft Visual Basic for Applications” window, in which you need to open a module that is not in use.
  4. Subsequently, copy the following VBA code into this module.
Sub DisplayNextReminderTime_TaskList()
    Dim objTasksFolder As Outlook.Folder
    Dim objTask As Outlook.TaskItem
    Dim objProperties As Outlook.UserProperties
    Dim objProperty As Outlook.UserProperty
    Dim strPropertyName As String
    Dim objReminders As Outlook.Reminders
    Dim objReminder As Outlook.Reminder
 
    Set objTasksFolder = Outlook.Application.ActiveExplorer.CurrentFolder
 
    strPropertyName = "Next Reminder Time"
 
    Set objReminders = Outlook.Reminders
 
    If objTasksFolder.DefaultItemType = olTaskItem Then
       For Each objTask In objTasksFolder.Items
           Set objProperties = objTask.UserProperties
 
           Set objProperty = objProperties.Find(strPropertyName, True)
           If objProperty Is Nothing Then
              Set objProperty = objProperties.Add(strPropertyName, olText, True)
           End If
 
           For Each objReminder In objReminders
               If objReminder.Item.Class = olTask And objReminder.Caption = objTask.Subject And objReminder.OriginalReminderDate = objTask.ReminderTime Then
                  objProperty.value = objReminder.NextReminderDate
                  objTask.Save
               End If
          Next
      Next
    End If
End Sub

VBA Code - Display Next Reminder Time in Task List

  1. After that, you can exit the current window.
  2. Then you need to change your Outlook macro security level to low
  3. Later you can switch to Outlook “Tasks” area.
  4. And for later convenient access, you’d better add the new macro to the Quick Access Toolbar. Head to “File” > “Options” > “Quick Access Toolbar” to add it.
  5. Next you should open a certain “Task” folder and click the new macro button in Quick Access Toolbar.Run Macro
  6. After macro finishes, you need to add the new “Next Reminder Time” column.
  • At first, shift to “View” tan and hit “View Settings” button.
  • In the “Advanced View Settings” dialog box, click the “Columns” button.
  • Next in “Show Columns” screen, select “User-defined fields in folder” in “Select available columns from” list.
  • Then locate and pitch on “Next Reminder Time” column.
  • Hit “Add” button in center.
  • Optionally, you can use “Move Up” to change the order.
  • Lastly click a series of “OK” until all dialog boxes are closed.Add the new “Next Reminder Time” column
  1. Eventually, after backing to the task list, you will see the Next Reminder Time, like the screenshot below:Next Reminder Time in Task List

Employ an External Repair Tool

As an email client, Outlook has quantities of capabilities. Nevertheless, it cannot keep away from errors and corruption. Thus, you’re required to back up your PST file on a regular basis. With backups, even though you suffer Outlook corruption later, you’ll be capable of restoring Outlook data much more easily. Also, it is also suggested to get hold of a robust PST recovery tool, such as DataNumen Outlook Repair.

Author Introduction:

Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including corrupt sql and outlook repair software products. For more information visit www.datanumen.com

Comments are closed.