lost objects

[Keith G Hicks]

Word 2003.

How can I locate and move items that manage to end up off the page (such as
images or text boxes) when resizing page layout or moving text around? I'd
like to do this without moving existing items around or resizing again. Is
there a way to do this? It seems like there should be a list of objects that
can be accessed where one can change properties such as position (similar to
what one might do with an object on a VB form).

Keith

 

[Cindy M.]

Hi Keith,

Word 2003.

How can I locate and move items that manage to end up off the page (such as
images or text boxes) when resizing page layout or moving text around? I'd
like to do this without moving existing items around or resizing again. Is
there a way to do this? It seems like there should be a list of objects that
can be accessed where one can change properties such as position (similar to
what one might do with an object on a VB form).

You'd need to do this using macro code. For example, something like this might
help that moves all shapes anchored in the selected range back onto the page
if they're "off" the page:

Sub RecoverImages()
Dim rng As Word.Range
Dim shp As Word.Shape

Set rng = Selection.Range
For Each shp In rng.ShapeRange
If shp.Left < 0 Then shp.Left = 10
If shp.Top < 0 Then shp.Top = 10
Next
End Sub

Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun 17 2005)
http://www.word.mvps.org

This reply is posted in the Newsgroup; please post any follow question or
reply in the newsgroup and not by e-mail