MS Project VBA - Возврат коллекции задач, назначенных для сводной задачи

Question

Я ищу несколько VBA, которые возвратят коллекцию задач, назначенных подзадаче в Microsoft Project. Я могу использовать метод .Summary для определения итоговой задачи, но как я могу получить задачи под этой итоговой задачей?

Благодаря

Answer 1

OutlineChildren даст вам коллекцию непосредственных подзадач. Например, этот код будет охватывать все задачи в активном проекте и распечатывать имя каждой сводной задачи с именем своей подзадачи.

For Each t In ActiveProject.Tasks 
    For Each s In t.OutlineChildren 
     Debug.Print "Summary task: " & t.Name, "Subtask: " & s.Name 
    Next s 
Next t