Application.UpdateTasks 方法 (Project)

更新选定任务。

语法

expression。 UpdateTasks( _PercentComplete_, _ActualDuration_, _RemainingDuration_, _ActualStart_, _ActualFinish_, _Notes_ )

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
PercentComplete	可选	Variant	活动任务的完成百分比。
ActualDuration	可选	Variant	选定任务的实际工期。
RemainingDuration	可选	Variant	选定任务的剩余工期。
ActualStart	可选	Variant	选定任务的实际开始日期。
ActualFinish	可选	Variant	选定任务的实际完成日期。
Notes	可选	String	选定任务的"备注"域中的注释。 该值可以是纯文本，而不是 "备注" 对话框中的 RTF 格式。

返回值

Boolean

说明

使用 UpdateTasks 方法，而不指定任何参数将显示 更新任务对话框。

示例

下面的示例将创建一个名为"TestTask-1"的任务，并将该任务更新为已完成 50%，然后删除该任务。

Sub Update_Tasks() 
 
 'Activate Gantt Chart 
 ViewApply Name:="Gantt Chart" 
 
 'Create a task 
 RowInsert 
 SetTaskField Field:="Name", Value:="TestTask-1" 
 SetTaskField Field:="Duration", Value:="2" 
 
 'Update the percent complete of the new task. 
 UpdateTasks PercentComplete:="50" 
 
 'Delete the new task 
 ActiveProject.Tasks("TestTask-1").Delete 
End Sub

支持和反馈

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