title | ms.service | api_name | ms.assetid | ms.date | ms.localizationpriority | |
---|---|---|---|---|---|---|
Task.Flag4 property (Project) |
project-server |
|
8fe98757-39f1-2ca8-237f-6675fec7bd99 |
06/08/2017 |
medium |
Gets or sets the value of a task flag custom field. Read/write Variant.
expression. Flag4
expression A variable that represents a Task object.
The following example deletes all the tasks that have the Flag1 set to True.
Sub DeleteNonEssentialTasks()
Dim T As Task ' Task object used in For Each loop
' Delete nonessential tasks in the active project.
For Each T In ActiveProject.Tasks
If Not (T Is Nothing) Then
If T.Flag1 = True Then T.Delete
End If
Next T
End Sub
[!includeSupport and feedback]