Objeto SharedWorkspaceTask (Office)

O objeto SharedWorkspaceTask representa uma tarefa em um espaço de trabalho de documento compartilhado. Membro da coleção SharedWorkspaceTasks.

Comentários

Use o objeto SharedWorkspaceTask para gerenciar tarefas atribuídas aos membros que estão colaborando em documentos no espaço de trabalho compartilhado.

Use a propriedade Item (index) da coleção SharedWorkspaceTasks para retornar um objeto SharedWorkspaceTask específico.

Use a propriedade Title para definir o texto da tarefa que aparece na guia Tarefas do painel de tarefas do Workspace Compartilhado e na página da Web do workspace compartilhado. Use a propriedade Description para fornecer informações adicionais sobre a tarefa.

Atribua a tarefa a um membro do workspace usando a propriedade AssignedTo e o nome de usuário de domínio do membro. Especifique uma data de vencimento para a tarefa usando a propriedade DueDate .

Use as enumerações para Priority de tarefa e o Status para indicar a importância relativa da tarefa e atualizar o status da tarefa.

Use o método Save para carregar alterações no servidor após modificar as propriedades do objeto SharedWorkspaceTask.

Use as propriedades CreatedBy, CreatedDate, ModifiedBy e ModifiedDate para retornar informações sobre o histórico de cada tarefa.

Exemplo

O exemplo a seguir retorna o número de tarefas no espaço de trabalho compartilhado e as informações sobre cada tarefa.

    Dim swsTask As Office.SharedWorkspaceTask 
    Dim strTaskInfo As String 
    strTaskInfo = "The shared workspace contains " & _ 
    ActiveWorkbook.SharedWorkspace.Tasks.Count & " Task(s)." & vbCrLf 
    For Each swsTask In ActiveWorkbook.SharedWorkspace.Tasks 
        strTaskInfo = strTaskInfo & swsTask.Title & vbCrLf & _ 
            " - Description: " & swsTask.Description & vbCrLf & _ 
            " - Assigned to: " & swsTask.AssignedTo & vbCrLf & _ 
            " - Due date: " & swsTask.DueDate & vbCrLf & _ 
            " - Priority: " & swsTask.Priority & vbCrLf & _ 
            " - Status: " & swsTask.Status & vbCrLf 
    Next 
    MsgBox strTaskInfo, vbInformation + vbOKOnly, _ 
        "Tasks in Shared Workspace" 
    Set swsTask = Nothing 

Confira também

• Membros do objeto SharedWorkspaceTask
• Referência do modelo de objeto

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.