Task.Rollup 属性 (Project)

如此 如果子任务的日期显示在其相应的摘要任务条形图上。 读/写 Variant。

语法

expression。 Rollup

表达 一个代表 Task 对象的变量。

备注

汇总 属性必须在同时发生的总成型子任务或摘要任务 ，则返回 True 。

示例

下面的示例设置 汇总 属性为 True 的里程碑任务并为 假 活动项目中的其他任务。

Sub DisplayMilestonesInSummaryBars() 
 
 Dim T As Task ' Task object used in For Each loop 
 
 ' Cycle through tasks in active project. 
 For Each T In ActiveProject.Tasks 
 ' If task is a milestone or a summary, set its Rollup property to True. 
 If T.Summary Or T.Milestone Then 
 T.Rollup = True 
 ' If task isn't a summary task or milestone, set its Rollup property to False. 
 Else 
 T.Rollup = False 
 End If 
 Next T 
 
End Sub

支持和反馈

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