The groupbox isn't an OleObject.

ActiveSheet.GroupBoxes.Add(110.25, 84, 112.5, 69.75).Select


--
Regards,
Tom Ogilvy



"michael v" wrote in message
...
I would like to make this work with the group box but I don't seem to be
able to find it as a classtype ?

Sub AddComm_button()
ActiveSheet.OLEObjects.Add ClassType:="Forms.Frame.1", Left:=126, Top:=96,
Width:=126.75, Height:=25.5
End Sub