Oleobjects group box

[michael v]

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

[Tom Ogilvy]

The groupbox isn't an OleObject.

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


--
Regards,
Tom Ogilvy



"michael v" <[email protected]> wrote in message
news:[email protected]...
> 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
>
>
>
>

[michael v]

Thanx Tom

"Tom Ogilvy" <[email protected]> wrote in message
news:[email protected]...
> The groupbox isn't an OleObject.
>
> ActiveSheet.GroupBoxes.Add(110.25, 84, 112.5, 69.75).Select
>
>
> --
> Regards,
> Tom Ogilvy
>
>
>
> "michael v" <[email protected]> wrote in message
> news:[email protected]...
> > 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
> >
> >
> >
> >
>
>