WorkbookBase.GetWorkflowTasks Metoda

Definice

Obor názvů:

Microsoft.Office.Tools.Excel

Sestavení:

Microsoft.Office.Tools.Excel.v4.0.Utilities.dll

Vrátí kolekci úkolů pracovního postupu pro sešit.

public:
 Microsoft::Office::Core::WorkflowTasks ^ GetWorkflowTasks();

public Microsoft.Office.Core.WorkflowTasks GetWorkflowTasks ();

member this.GetWorkflowTasks : unit -> Microsoft.Office.Core.WorkflowTasks

Public Function GetWorkflowTasks () As WorkflowTasks

Návraty

WorkflowTasks

Kolekce Microsoft.Office.Core.WorkflowTasks, která obsahuje úkoly pracovního postupu pro sešit.

Příklady

Následující příklad kódu zobrazí počet úkolů pracovního postupu, které jsou aktuálně přidruženy sešitu. Příklad pak iteruje každý úkol pracovního postupu, pokud existuje, a zobrazí některé vybrané vlastnosti úkolu v okně se zprávou.

Chcete-li do sešitu přidat úkoly pracovního postupu, je nutné sešit publikovat na webu Office Sharepoint Serveru.

Tento příklad je pro přizpůsobení na úrovni dokumentu.

private void DisplayWorkflowTasks()
{
    Office.WorkflowTasks tasks = this.GetWorkflowTasks();
    if (tasks.Count > 1) 
    {
        MessageBox.Show("There are " + tasks.Count.ToString() 
            + " workflow tasks.");
    }
    else if (tasks.Count == 1)
    {
        MessageBox.Show("There is " + tasks.Count.ToString() 
            + " workflow task.");
    }
    else if (tasks.Count == 0)
    {
        MessageBox.Show(
            "No workflow tasks are associated with this document.");
    }
    
    foreach (Office.WorkflowTask task in tasks)
    {
        MessageBox.Show( 
            "Workflow Task ID: " + task.Id 
            + "\r\nWorkflow Task Name: " + task.Name 
            + "\r\nAssigned To: " + task.AssignedTo 
            + "\r\nDescription: " + task.Description);
    }
}

Private Sub DisplayWorkflowTasks()
    Dim tasks As Office.WorkflowTasks = Me.GetWorkflowTasks()
    If tasks.Count > 1 Then
        MessageBox.Show("There are " + tasks.Count.ToString() _
                        + " workflow tasks.")
    ElseIf tasks.Count = 1 Then
        MessageBox.Show("There is " + tasks.Count.ToString() _
                        + " workflow task.")
    ElseIf tasks.Count = 0 Then
        MessageBox.Show( _
            "No workflow tasks are associated with this document.")
    End If
    For Each task As Office.WorkflowTask In tasks
        MessageBox.Show( _
            "Workflow Task ID: " + task.Id _
            + vbCrLf + "Workflow Task Name: " + task.Name _
            + vbCrLf + "Assigned To: " + task.AssignedTo _
            + vbCrLf + "Description: " + task.Description)
    Next
End Sub