VBOffice

Bulk Edit the Priority for Multiple Task Items

In this sample we change the priority for multiple task items at once.

Last modified: 2008/01/15 | Accessed: 21.087  | #62
◀ Previous sample Next sample ▶
ReplyAll ReplyAll
ReplyAll alerts you before unintentionally replying all, or if you are a confidential BCC recipient of the e-mail.

This sample demonstrates how to change the priority for all the selected tasks in one go to 'High'.


tip  How to add macros to Outlook
Public Sub ChangeTaskPriority()
  Dim Task As Outlook.TaskItem
  Dim Selection As Outlook.Selection
  Dim Folder As Outlook.MAPIFolder
  Dim i&

  Set Folder = ActiveExplorer.CurrentFolder
  If Folder.DefaultItemType = olTaskItem Then
    Set Selection = ActiveExplorer.Selection
    For i = 1 To Selection.Count
      Set Task = Selection(i)
      Task.Importance = olImportanceHigh
      Task.Save
    Next
  End If
End Sub
SAM SAM
SAM automatically sets the sending account, or sender address, and folder for sent items based on several criteria.
email  Send a message