Picture Conversion

[Jeff Mathewson]

Hello all,

Been having problems converting Picture Objects to Shapes (last message
stated I needed InlineShapes – Err) The problem is that the objects cannot
be moved or edited unless they are converted.

The macro that I'm working on does the conversion but I'm running into
problems. When I select an object with VBA, the page itself is not
selected. In this when I do a fast cut/paste the image is, as you may guess,
pasted on page 1. The question I have is how do I get Word to go to the page
that the object is highlighted on??

Also any other tips on converting objects to images, please pass my way. I
could be going about this all wrong...

Problem:

-- Converting WordPerfect documents to Word 2007
-- When converting the documents, the pictures show up as embedded objects
(text boxes) They show up as Shapes, but cannot be moved. Objects on the
page..you can delete everything on the document, yet the images will stay in
the same place.
-- I’m trying to use cut/paste in a for loop. All is going fine but running
into the above problem.

Thanks for any tips,

Jeff.

 

[periodic]

First, why do you have to go to the shape? It is faster to not skip around in
the pages but just let the macro to its work. To me it more sounds like hat
you want to
do it to move the insertion point to a particular place in the document.

Anyway to get word to go the selected range use
ActiveWindow.ScrollIntoView obj:=<some range>, Start:=<True|False>
See the help for further description of this function.

If you want to Move the insertion point you can use the range property from
the object you have found. I guess anyway since I don't really know what type
of object you have.

Something like this

dim foo as range
set foo = <your object>.range
'do stuff with your object
foo.collapse direction:=wdCollapseStart
foo.Paste