次の方法で共有

SplitParts オブジェクト (Project)

  • [アーティクル]

SplitPart オブジェクトのコレクションを格納します。

例

SplitParts コレクション オブジェクトの使い方

1 つの SplitPart オブジェクトを返すには、SplitParts (Index) を使用します。Index はタスクインデックス番号のインデックス番号です。 次の例では、開始の一覧が表示し、アクティブ セルのタスクの分割タスク部分の時間を完了します。

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 オブジェクト) を使用して、SplitParts コレクションに SplitPart オブジェクトを追加します。 ( Split メソッドは、タスクに分割を作成します)。次の例では、水曜日から月曜日までのタスクに分割を作成します。

ActiveCell.Task.Split "10/2/02", "10/7/02"

メソッド

名前
Add

プロパティ

名前
アプリケーション
Count
アイテム
Parent

関連項目

Project オブジェクト モデル

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。