Объект ResourceGroups (Project)
Представляет все определения групп на основе ресурсов. ResourceGroups — это коллекция объектов Group .
Использование коллекции ResourceGroups
Используйте свойство ResourceGroups , чтобы вернуть коллекцию ResourceGroups . В следующем примере перечислены имена всех групп ресурсов в активном проекте.
Dim rg As Group
Dim rGroups As String
For Each rg in ActiveProject.ResourceGroups
rGroups = rGroups & rg.Name & vbCrLf
Next rg
MsgBox rGroups
Используйте метод Add , чтобы добавить объект Group в коллекцию ResourceGroups . В следующем примере создается новая группа, которая группирует ресурсы по стандартной скорости, а затем изменяет условие, чтобы ресурсы отсортировались в порядке убывания.
ActiveProject.ResourceGroups.Add "Resources by Rate", "Standard Rate"
ActiveProject.ResourceGroups("Resources by Rate").GroupCriteria(1).Ascending = False
Замечания
Для групп ресурсов, в которых можно поддерживать иерархию групп, а цвет ячейки может быть шестнадцатеричным значением, используйте объект коллекции ResourceGroups2 .
Методы
Имя |
---|
Add |
Copy |
Свойства
Имя |
---|
Application |
Count |
Item |
Parent |
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.