Weird numbering for inserted pictures

R

Rick

I am trying to automate a process that takes a collection of inserted
pictures and cuts and pastes them one to a slide.

If I open a new document and insert 31 pictures, then cut and paste each one
to a separate slide, when I view the macro the pictures numbers run from 4
to 34 instead of 1 to 31 (or 0 to 30).

I tried
i = 34
pictnum = "Picture " & i
ActiveWindow.Selection.SlideRange.Shapes(pictnum).Select
ActiveWindow.Selection.Cut
but it said that the item with the specified name wasn't found.
When I cut and pasted what was picture 34, it is now identified as picture
3. Too confusing for my little brain.

Any idea how I would set up a loop to copy each picture to a separate slide?

FYI, each picture is a map of rainfall for one day of the month, so the
sequence they are pasted is important too.

Thanks
rg
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top