通过

SharedWorkspaceTask.Status 属性 (Office)

  • 项目

获取或设置指定共享工作区任务的状态。 读/写。

注意

自 Microsoft Office 2010 开始，此对象或成员已弃用，不应再行使用。

语法

表达式。地位

expression 是必需的。 一个代表 SharedWorkspaceTask 对象的变量。

备注

可对服务器上的共享工作区任务架构进行自定义。 当调用 Add 或 Save 方法时，对架构进行自定义可能会影响任务状态枚举。 Status 属性值按如下方式进行映射：

  • 下载的值 1 到 5 映射到 msoSharedWorkspaceTaskStatus 枚举值 1 到 5。 超过 5 的架构值映射到枚举值 1 (msoSharedWorkspaceTaskStatusInProgress)。

  • 上载的枚举值 1 到 5 映射到架构值 1 到 5。 如果用户指定的值没有映射到架构中定义的任何值，则会忽略该值，而不显示任何提示，并且不会在服务器上更新 Status 属性。

示例

以下示例显示当前共享工作区中状态未设置为 “完成”的所有任务的列表。

    Dim swsTask As Office.SharedWorkspaceTask 
    Dim strTaskStatus As String 
    For Each swsTask In ActiveWorkbook.SharedWorkspace.Tasks 
        If swsTask.Status <> msoSharedWorkspaceTaskStatusCompleted Then 
            strTaskStatus = strTaskStatus & swsTask.Title & vbCrLf 
        End If 
    Next 
    MsgBox "The following tasks have not been completed:" & vbCrLf & _ 
        strTaskStatus, vbInformation + vbOKOnly, "Incomplete Tasks" 
    Set swsTask = Nothing

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。