Application.SetTPField 方法 (Project)

为"工作组计划程序"视图中的一个或多个任务的"完成百分比"域设置值。

语法

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

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

参数

名称	必需/可选	数据类型	说明
Field	必需	字符串	Field 参数只能为“% Complete”。 此外可以使用 pjTaskPercentComplete ，如下所示的示例使用 FieldConstantToFieldName 方法。
Value	必需	字符串	Field 参数的值。 这些值介于"0"到"100"之间，表示完成百分比。
AllSelectedTasks	可选	Boolean	在Project中不使用。 值为 True ，这意味着 Field和 Value参数被设置为选定的所有任务。
Create	可选	Boolean	在Project中不使用。
TaskID	可选	Long	在Project中不使用。
ProjectName	可选	String	在Project中不使用。

返回值

Boolean

示例

下面的示例将“工作组计划程序”视图中的选定任务设置为已完成 40%。

Sub TestSetTPField() 
    Dim fieldName As String 
 
    fieldName = FieldConstantToFieldName(pjTaskPercentComplete) 
    Application.SetTPField Field:=fieldName, Value:="40" 
End Sub

支持和反馈

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