| title | ms.prod | api_name | ms.assetid | ms.date | |
|---|---|---|---|---|---|
Resource.Flag19 Property (Project) |
project-server |
|
f28cabc4-eb6f-e503-5975-5ee92b1c1534 |
06/08/2017 |
True if the flag associated with a Resource is set. Read/write Variant.
expression. Flag19
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