MS-PROJECT如何正确应用Application.AddNewColumn方法?

时间:2019-07-19 07:19:29

标签: microsoft-project-vba

我想在我的代码的开头显示一列(摘要),以从该数据中检索并在代码末尾再次将其关闭。 在我的代码中。 到目前为止,在我的代码中,必须始终显示列摘要才能起作用,但是我不想这样做。 这就是为什么我想在该列的开头显示并在结尾处隐藏它

[^\n]

1 个答案:

答案 0 :(得分:0)

要向甘特图表添加或删除列,请使用TableEditEx方法,如本SO帖子所示:How to add a new column in Microsoft Project...How to Add Column...to MS Project


但是有一种更好的方法来获取任务的属性。

您无需添加列即可获取活动任务的属性。使用TaskActiveCell属性。

For i = 0 To LastTaskRow - 1

    SelectRow Row:=i + 1, RowRelative:=False

    If ActiveCell.Task.Summary Then
        GanttBarFormatEx MiddleShape:=5, righttext:="text29"
    End If

Next i

请注意,这使用了SelectRow方法,该方法具有一个称为RowRelative的参数。在遍历这样的所有任务时,最好将该参数设置为False并将Row参数设置为所需的绝对位置;否则RowRelative默认为True,并且选择位置从当前选择位置向前移动,而不是第一项任务。