Grips Active

#1
I want to detect active grips on the screen
and after that a selection set is made through the VBA macro look what I just
think below:
sub GripsAtive()
Dim SS As SelectionSet
Set SS = ThisWorkspace.ActiveDocument.SelectionSets.Add("SS")
if gripsactive then
SS.SelectOnScreen 'selection is made
rest of the code
else
exit sub
end if
end sub
Is it possible to do that

Thank you
AHM

#2
AHM,

Are you trying to return the currently selected objects? That is the objects on the screen selected by grips. If so try:

Private Sub TESTING()
Dim SS As SelectionSet

Set SS = IntelliCAD.ActiveDocument.ActiveSelectionSet
'...do stuff with selection set
'.....
End Sub


ssc