タスク オブジェクト (プロジェクト)

Task オブジェクトのコレクションが含まれています。

例

Task オブジェクトの使い方

1 つの Task オブジェクトを取得するには、Tasks (index) を使用します。ここで、index はタスク インデックス番号またはタスク名です。 次の例では、アクティブなプロジェクトのすべてのタスクに割り当てられているすべてのリソースの名前を出力します。

Dim Temp As Long, A As Assignment 

Dim TaskName As String, Assigned As String, Results As String 

 

For Temp = 1 To ActiveProject.Tasks.Count 

 TaskName = "Task: " & ActiveProject.Tasks(Temp).Name & vbCrLf 

 For Each A In ActiveProject.Tasks(Temp).Assignments 

 Assigned = A.ResourceName & ListSeparator & " " & Assigned 

 Next A 

 Results = Results & TaskName & "Resources: " & _ 

 Left$(Assigned, Len(Assigned) - Len(ListSeparator & " ")) & vbCrLf & vbCrLf 

 TaskName = "" 

 Assigned = "" 

Next Temp 

 

MsgBox Results

Tasks プロパティを使用して、Tasks コレクションを返します。 次の例は、選択範囲のすべてのタスクの名前を表示します。

Dim T As Task, Names As String 

 

For Each T In ActiveSelection.Tasks 

 Names = Names & T.Name & vbCrLf 

Next T 

 

MsgBox Names

Add メソッドを使用して、Task オブジェクトを Tasks コレクションに追加します。 次の使用例は、新しいタスクをタスク リストの末尾に追加します。

ActiveProject.Tasks.Add "Hang clocks"

メソッド

プロパティ

関連項目

Project オブジェクト モデル

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

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