Project.Resource.Flag16.md

title	ms.service	api_name	ms.assetid	ms.date	ms.localizationpriority
Resource.Flag16 property (Project)	project-server	Project.Resource.Flag16	5fa75173-8038-35be-ef8d-3f96e5ba377f	06/08/2017	medium

Resource.Flag16 property (Project)

True if the flag associated with a Resource is set. Read/write Variant.

Syntax

expression. Flag16

expression A variable that represents a Resource object.

Example

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]