свойство Task.Name (Project)
Возвращает или задает имя объекта Task . Для чтения и записи, String.
expression. Имя
Выражение Переменная, представляющая объект Task .
В следующем примере отображаются имена задач, содержащие указанный текст.
Sub NameExample()
Dim t As Task
Dim x As String
Dim y As String
x = InputBox$("Search for tasks that include the following text in their names:")
If Not x = "" Then
For Each t In ActiveProject.Tasks
If InStr(1, t.Name, x, 1) Then
y = y & vbCrLf & t.ID & ": " & t.Name
End If
Next t
If Len(y) = 0 Then
MsgBox "No tasks with the text " & x & " found in the project", vbExclamation
Else
MsgBox y
End If
End If
End Sub
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.