Объект Tasks (Project)Tasks object (Project)

Содержит коллекцию объектов Task .Contains a collection of Task objects.

ПримерExample

Использование объекта TaskUsing the Task Object

Используйте tasks (index), где index — это порядковый номер задачи или имя задачи, чтобы вернуть один объект Task .Use Tasks (index), where index is the task index number or task name, to return a single Task object. В следующем примере выводятся имена всех ресурсов, назначенных каждой задаче в активном проекте.The following example prints the names of every resource assigned to every task in the active project.

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 .Use the Tasks property to return a Tasks collection. В приведенном ниже примере отображается имя каждой задачи в выделенном фрагменте.The following example displays the name of every task in the selection.

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 .Use the Add method to add a Task object to the Tasks collection. В приведенном ниже примере показано, как добавить новую задачу в конец списка задач.The following example adds a new task to the end of the task list.

ActiveProject.Tasks.Add "Hang clocks"

МетодыMethods

ИмяName
AddAdd

СвойстваProperties

ИмяName
ApplicationApplication
CountCount
ItemItem
ParentParent
UniqueIDUniqueID

См. такжеSee also

Объектная модель ProjectProject Object Model

Поддержка и обратная связьSupport and feedback

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.