title | ms.service | api_name | ms.assetid | ms.date | ms.localizationpriority | |
---|---|---|---|---|---|---|
Assignment.Flag12 property (Project) |
project-server |
|
b4f07f88-1e02-70d4-79cf-bc0d5f8ba0d4 |
06/08/2017 |
medium |
True if the flag associated with an Assignment is set. Read/write Variant.
expression. Flag12
expression A variable that represents an Assignment 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]