Task.Name 属性 (Project)
获取或设置 Task 对象的名称。 读/写 String。
语法
表达式。名字
表达 一个代表 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。