Returns a "Group" object with the given node number.

Syntax:

GetGroup( NodeNumber As Long ) As Group
Return: Group
Parameters: NodeNumber Node number of the group to be returned.

Example:
Dim ProjFile As ProjectFile
Dim TU As TransUnit
Dim Group As Group

Set ProjFile = Application.ActiveProjectFile
Set TU = Application.ActiveTransUnit

If (ProjFile.IsGroup(TU.parentNode)) Then
    Set Group = ProjFile.GetGroup(TU.ParentNode)
End If

See also:

Class ProjectFile


Last Updated: 04/27/05