Table of contents
TOC
Recolher sumário
Expandir sumário

Propriedade GroupCriteria.Count (projeto)GroupCriteria.Count Property (Project)

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Obtém o número de itens na coleção GroupCriteria . Somente leitura Long.Gets the number of items in the GroupCriteria collection. Read-only Long.

SintaxeSyntax

expressão. Contagemexpression. Count

expressão Uma variável que representa um objeto GroupCriteria .expression A variable that represents a GroupCriteria object.

ExemploExample

O exemplo a seguir solicita ao usuário o nome de um recurso e, em seguida, atribui esse recurso a tarefas sem nenhum recurso.The following example prompts the user for the name of a resource and then assigns that resource to tasks without any resources.

Sub AssignResource() 



 Dim T As Task ' Task object used in For Each loop 

 Dim R As Resource ' Resource object used in For Each loop 

 Dim Rname As String ' Resource name 

 Dim RID As Long ' Resource ID 



 RID = 0 

 RName = InputBox$("Enter the name of a resource: ") 



 For Each R in ActiveProject.Resources 

 If R.Name = RName Then 

 RID = R.ID 

 Exit For 

 End If 

 Next R 



 If RID <> 0 Then 

 ' Assign the resource to tasks without any resources. 

 For Each T In ActiveProject.Tasks 

 If T.Assignments.Count = 0 Then 

 T.Assignments.Add ResourceID:=RID 

 End If 

 Next T 

 Else 

 MsgBox Prompt:=RName &; " is not a resource in this project.", buttons:=vbExclamation 

 End If 



End Sub

Ver tambémSee also

ConceitosConcepts

Objeto da coleção GroupCriteriaGroupCriteria Collection Object

© 2018 Microsoft