SharedWorkspaceTasks Collection

A collection of the SharedWorkspaceTask objects in the current shared workspace.

Using the SharedWorkspaceTasks Collection

Use the Tasks property of the SharedWorkspace object to return a SharedWorkspaceTasks collection.

        Dim swsTasks As Office.SharedWorkspaceTasks
    Set swsTasks = ActiveWorkbook.SharedWorkspace.Tasks
    MsgBox "There are " & swsTasks.Count & _
        " task(s) in the current shared workspace.", _
        vbInformation + vbOKOnly, _
        "Collection Information"
    Set swsTasks = Nothing