Role: This interface is used to retrieve/assign the value of attributes
for the Grab activity.
The following code snippet can be used to obtain a GrabAct from a selected Activity
Dim oSelectAct As Activity
set oSelectAct = CATIA.ActiveDocument.Selection.FindObject("CATIAActivity")
Dim objGrabAct As GrabAct
set objGrabAct = oSelectAct.GetTechnologicalObject("GrabAct")