It is not too difficult to create a macro to group selected shapes and
de-select the check box in one operation e.g.
Sub GroupAndLock()
With Selection.ShapeRange
On Error Resume Next
.Group.Select
.RelativeHorizontalPosition = _
wdRelativeHorizontalPositionColumn
.RelativeVerticalPosition = _
wdRelativeVerticalPositionPage
End With
End Sub
http://www.gmayor.com/installing_macro.htm
--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP
My web site www.gmayor.com
Word MVP web site http://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Francosayitlikeitis wrote:
[Quoted Text] > It is annoying not to mention time consuming to have to keep
> accessing Format Auto-shape - Layout - Advanced, to de-select the
> 'Move object with text' check box.
> This becomes necessary every time objects are grouped.
> All the best
|