【发布时间】:2014-04-08 02:35:42
【问题描述】:
我正在使用 Microsoft Project 通过我的 C# 项目监控我的进度。
我有不同的条形样式和颜色,我尝试过格式 -> 甘特图样式将它们全部设置为一种样式和颜色,但是当我尝试它时,只有某些会改变颜色和样式。
任何想法如何将所有条重置为相同的样式和颜色?
【问题讨论】:
标签: ms-office ms-project
我正在使用 Microsoft Project 通过我的 C# 项目监控我的进度。
我有不同的条形样式和颜色,我尝试过格式 -> 甘特图样式将它们全部设置为一种样式和颜色,但是当我尝试它时,只有某些会改变颜色和样式。
任何想法如何将所有条重置为相同的样式和颜色?
【问题讨论】:
标签: ms-office ms-project
有两种方法可以改变甘特条的样式。
第一个,正如您已经尝试过的,是更改甘特条样式。这将改变每个类别中所有条形的样式。
第二种方法是右键单击特定栏并选择格式栏...,然后为其分配不同的颜色。如果有人这样做了,那么更改样式不会对显式应用样式更改的条产生任何影响。
要手动更改条形样式,请右键单击不符合样式规则的条形,然后选择格式化条形...
将出现以下对话框 - 您可以单击此对话框底部的重置按钮,条形样式将恢复为默认值。
如果您有很多条处于这种状态(或者如果有些只是进行了细微的更改),则可能值得以编程方式完成整个项目,这可以通过运行以下代码来完成:
Sub ResetGanttBarStyles()
Dim t As Task
For Each t In ActiveProject.Tasks
If Not t Is Nothing Then
Application.GanttBarFormatEx t.Index, Reset:=True
End If
Next t
End Sub
【讨论】:
此代码在 2010 年没有任何改变。
Sub ResetGanttBarStyles()
Dim t As Task
For Each t In ActiveProject.Tasks
If Not t Is Nothing Then
Application.GanttBarFormatEx t.Index, Reset:=True
End If
Next t
End Sub
您可以使用这种格式设置所有类似的任务,但您需要使用t.ID 而不是t.index 来引用当前任务。
【讨论】: