SplitPart 物件 (Project)

代表任務部分。 SplitPart 物件是 SplitParts 集合的成員。

範例

使用 SplitPart 物件

使用 SplitParts (index ) ,其中 index 是任務部分的索引編號,可以傳回單一 SplitPart 物件。 下列範例會列出開始和結束時間的作用儲存格中之任務的每個任務部分。

Dim Part As Long, Portions As String

For Part = 1 To ActiveCell.Task.SplitParts.Count
    With ActiveCell.Task
        Portions = Portions & "Task portion " & Part & ": Start on " & _
            .SplitParts(Part).Start & ", Finish on " & _
            .SplitParts(Part).Finish & vbCrLf
    End With
Next Part

MsgBox Portions

使用 SplitParts 集合

使用 SplitParts 屬性,可以傳回一個 SplitParts 集合。 下面範例會傳回使用中專案中每個任務的任務部分數目。

Dim T As Task

For Each T In ActiveProject.Tasks
    If Not (T Is Nothing) Then
        MsgBox T.Name & ": " & T.SplitParts.Count
    End If

Next T

使用 Split 方法 (Task 物件) 將 SplitPart 物件新增至 SplitParts 集合。 (split 方法會在任務中建立分割。 ) 下列範例會建立從星期三到星期一的任務,以2012年10月的方式建立分割。

ActiveCell.Task.Split "10/3/2012", "10/8/2012"

方法

名稱
Delete

屬性

名稱
Application
Finish
Index
Parent
Start

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應