Application.SetTaskField 方法 (Project)

设置由域的名称指定的任务域的值。

语法

expression。 SetTaskField( _Field_, _Value_, _AllSelectedTasks_, _Create_, _TaskID_, _ProjectName_ )

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
Field	必需	String	要设置的任务域的名称。
Value	必需	String	任务域的值。
AllSelectedTasks	可选	Boolean	如此 如果字段中的值设置为所有选定的任务。 False 的值设置为活动任务。 默认值为 False 。
Create	可选	Boolean	如此 如果项目创建一个任务，当活动单元格是一个空行。 默认值为 True 。
TaskID	可选	Long	包含待设置域的任务的标识号。 如果 AllSelectedTasks 为 True，则忽略 TaskID 。
ProjectName	可选	字符串	如果活动项目是合并项目，则为 TaskID 指定的任务指定项目的名称。 如果未指定 TaskID ， 项目名称 将被忽略。 默认值是活动项目的名称。

返回值

Boolean

说明

若要按照标识号设置任务域，请使用 SetTaskFieldByID 方法。

示例

以下示例将任务标识号为 3 的任务域“Name”更改为“New Task Name”，然后再将其改回原来的名称。

Sub Set_TaskField() 
    Dim T As Task 
    Set T = ActiveProject.Tasks(3)
 
    ' Save the task name 
    OldName = T.GetField(pjTaskName) 
 
    ViewApply Name:="&Gantt Chart" 
    SetTaskField Field:="Name", Value:="New Task's Name", TaskID:=3 
    SetTaskField Field:="Name", Value:=OldName, TaskID:=3 
End Sub

支持和反馈

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