Sends a status report to all Cc recipients (recipients returned by the StatusUpdateRecipients property) with the current status for the task. Returns an Object representing the status report.
*expression * Required. An expression that returns a TaskItem object.
This Visual Basic for Applications (VBA) example uses the StatusReport method to report the status of the currently open task.
Sub SendStatusReport() Dim myOlApp As New Outlook.Application Dim myTask As Outlook.TaskItem Dim myinspector As Outlook.Inspector Dim myReport As Object Set myinspector = myOlApp.ActiveInspector If Not TypeName(myinspector) = "Nothing" Then If TypeName(myinspector.CurrentItem) = "TaskItem" Then Set myTask = myinspector.CurrentItem Set myReport = myTask.StatusReport myReport.Send Else MsgBox "No task item is currently open." End If Else MsgBox "No inspector is currently open." End If End Sub
If you use Microsoft Visual Basic Scripting Edition (VBScript) in a Microsoft Outlook form, you do not create the Application object. This example shows how to perform the same task using VBScript.
Sub CommandButton1_Click() If TypeName(Item) = "TaskItem" Then Set myReport = Item.StatusReport myReport.Send Else MsgBox "The current item is not a task item." End If End Sub
Applies to | TaskItem Object