Définition d'éléments pour un suivi

  • Article

Microsoft Outlook fournit un nouveau système d’indicateur de tâche dans lequel certains éléments Outlook, tels que les éléments de courrier ou les éléments de contact, peuvent être marqués pour le suivi. L’indicateur d’un élément Outlook pour suivi affiche des informations sur cet élément Outlook, ainsi que d’autres informations basées sur des tâches, dans le module de navigation Barre To-Do et Calendrier dans l’interface utilisateur Outlook.

Les objets d'élément Outlook suivants ont été étendus pour prendre en charge le système d'application d'indicateur de tâche :

Marquage d'un élément en tant que tâche

Vous pouvez déterminer si un objet d’élément Outlook est marqué pour suivi en vérifiant la valeur de la propriété IsMarkedAsTask pour un élément Outlook. Utilisez la méthode MarkAsTask pour marquer un élément Outlook pour le suivi et la méthode ClearTaskFlag pour annuler la marque de l’élément Outlook.

Définition de propriétés de tâche

Lorsqu’un élément Outlook est marqué pour le suivi à l’aide de la méthode MarkAsTask , une constante OlMarkInterval est utilisée pour spécifier les paramètres par défaut des propriétés TaskStartDate, TaskDueDate, TaskCompletedDate et ToDoTaskOrdinal de l’élément Outlook. Ces propriétés ne sont pas uniquement utilisées pour déterminer la durée et l'état d'accomplissement de la tâche associée à l'élément Outlook, mais aussi pour déterminer l'ordre dans lequel l'élément Outlook est affiché dans le module de navigation Barre des tâches et Calendrier.

Vous pouvez cependant définir ces propriétés individuellement, via un programme, afin de prendre en charge les durées personnalisées ou modifier l'état d'accomplissement ou encore afficher l'ordre de l'élément Outlook, avoir avoir appelé la méthode MarkAsTask.

Une fois qu’un élément Outlook est marqué pour suivi, vous pouvez également définir la propriété TaskSubject de l’élément Outlook pour afficher une description de tâche autre que la valeur de la propriété Subject pour l’élément Outlook avec indicateur.

Éléments de tâche et application d'indicateur à une tâche

L’objet TaskItem prend en charge la propriété ToDoTaskOrdinal, de sorte que l’ordre d’affichage des éléments de tâche Outlook affichés dans la barre To-Do peut également être modifié par programme.

Filtrage d'éléments marqués en tant que tâches

Vous pouvez tirer profit des fonctionnalités de filtrage DASL (DAV Searching and Locating) d'Outlook pour filtrer des éléments Outlook marqués pour le suivi. L’exemple Visual Basic pour Applications (VBA) suivant définit un filtre DASL qui filtre uniquement les éléments Outlook dont la valeur de propriété IsMarkedAsTask est définie sur True, puis utilise le filtre pour générer un objet Table contenant des éléments Outlook filtrés récupérés à partir du dossier Boîte de réception par défaut.

Private Sub TableForIsMarkedAsTask() 
 Dim objTable As Outlook.Table 
 Dim objRow As Outlook.Row 
 Dim strFilter As String 
 
 On Error GoTo ErrRoutine 
 
 ' Define a DASL filter string that filters only those items 
 ' with an IsMarkedAsTask property value set to True. 
 strFilter = "@SQL=" & Chr(34) & _ 
 "https://schemas.microsoft.com/mapi/proptag/0x0E2B0003" & _ 
 Chr(34) & " = 1" 
 
 ' Use the filter to construct a table of Outlook items 
 ' retrieved from the Inbox default folder. 
 Set objTable = Application.Session.GetDefaultFolder(olFolderInbox).GetTable(strFilter) 
 
 With objTable 
 ' Add task-related columns to the table. 
 .Columns.Add ("From") 
 .Columns.Add ("FlagRequest") 
 .Columns.Add ("TaskStartDate") 
 .Columns.Add ("TaskDueDate") 
 .Columns.Add ("TaskCompletedDate") 
 
 ' Report the contents of the table 
 ' to the Immediate window. 
 Do Until .EndOfTable 
 Set objRow = .GetNextRow 
 Debug.Print objRow("Subject"), _ 
 objRow("From"), _ 
 objRow("FlagRequest"), _ 
 objRow("TaskStartDate"), _ 
 objRow("TaskDueDate"), _ 
 objRow("TaskCompletedDate") 
 Loop 
 End With 
 
EndRoutine: 
 ' Clean up 
 Set objRow = Nothing 
 Set objTable = Nothing 
 
 Exit Sub 
 
ErrRoutine: 
 MsgBox Err.Number & " - " & Err.Description, _ 
 vbOKOnly Or vbCritical, _ 
 "TableForIsMarkedAsTask" 
 
 GoTo EndRoutine 
End Sub

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.