Application.ManageSiteColumns 方法 (Project)

将显示 管理域对话框中，使同步内置域和自定义字段的本地项目中使用SharePoint 2013任务列表中的指定列。

语法

expression。 ManageSiteColumns

表达 返回 Application 对象的表达式。

返回值

Boolean

说明

ManageSiteColumns 方法是仅在项目的专业人员，使用已保存到 SharePoint 任务列表的本地项目中可用。 有关详细信息，请参阅 SynchronizeWithSite 方法。

下表显示了 "管理域" 对话框中的列和默认的已同步域。 默认情况下， "优先级" 和 "任务状态" SharePoint 列不与任何 Project 域同步，因此这些项为空。

同步	项目域	SharePoint 列
是	名称	标题
是	入门	开始日期
是	完成时间	截止日期
是	完成率	完成率
是	资源名称	分配对象
是	前置任务	前置任务
否		优先级
否		任务状态

示例

若要在“项目字段”列中添加 “优先级 ”字段并与 SharePoint 中的 “优先级” 列同步，请尝试以下操作：

1. 重命名文本自定义字段中的项目;例如，命名为 文本 1 为 SharePoint 优先级。
2. 运行 ManageSiteColumns 的方法，然后在 管理域对话框中，在 SharePoint 列对应于 优先级项目字段下拉列表中选择 SharePoint 优先级 (文本 1) 。
3. 运行 SyncPriority 宏。

Sub SyncPriority() 
    Dim tsk As Task 
    Dim msfPriority As String 
 
    Application.SynchronizeWithSite 
 
    For Each tsk In ActiveProject.Tasks 
        msfPriority = tsk.Text1 
 
        Select Case msfPriority 
            Case "(1) High" 
               tsk.Priority = 700 
           Case "(2) Normal" 
               tsk.Priority = 500 
           Case "(3) Low" 
               tsk.Priority = 300 
        End Select 
    Next tsk 
End Sub

支持和反馈

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