Поделиться через


Свойство Cell.Task (Project)

Возвращает объект Task, представляющий задачу в активной ячейке. Задача только для чтения.

Синтаксис

выражение. Task

Выражение Переменная, представляющая объект Cell .

Пример

В следующем примере отображаются имена всех задач на том же уровне структуры, что и выбранная задача.

Sub Siblings() 
 
 Dim MyParent As Task 
 Dim Sibling As Task 
 Dim Temp As String 
 
 Set MyParent = ActiveCell.Task.OutlineParent 
 
 For Each Sibling In MyParent.OutlineChildren 
 Temp = Sibling.Name & ListSeparator & " " & Temp 
 Next Sibling 
 
 Temp = Left$(Temp, Len(Temp) - Len(ListSeparator & " ")) 
 MsgBox Temp 
 
End Sub

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

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.