title | ms.service | api_name | ms.assetid | ms.date | ms.localizationpriority | |
---|---|---|---|---|---|---|
Resource.Flag2 property (Project) |
project-server |
|
962c6915-87a0-fa7b-51ec-8c968c9133c0 |
06/08/2017 |
medium |
True if the flag associated with a Resource is set. Read/write Variant.
expression. Flag2
expression A variable that represents a Resource 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]