View Single Post
  #3   Report Post  
~D~
 
Posts: n/a
Default

...just to add to this..I inserted a pdf as an object and it gave me an icon
linked to the pdf document. Is there anyway I can edit that picture so that
it reads the name of the document..just curious?

Thank you.

"Graham Mayor" wrote in message
...
Having read your initial requirement and the suggestions made by fellow
contributors, there may be an easier way. Word will not import PDFs, but
your suggestion of converting to graphic format seemed logical and Snag-It
makes it a breeze to output multi-page documents to separate files, by

using
its printer driver option to print from Acrobat.

Then provided you have Word set to insert images in line, you can insert

all
the produced images in a single operation - as they are full page images,
they will follow one another each to its own page. The only snags I can

see
are that the images will shrink to the current margins and because of a

bug
in Windows Explorer, the first image will often be placed last, so needs
moving. This can be eliminated by selecting the images in reverse order in
the insert picture dialog.

Playing around with this, I began a simple macro that inserts a section
break, resets the margins of the new section and inserts the images in
order. You will probably get a margin error when you try to print the

file,
but as the minimum margins are printer dependent, I can do nothing about
this without access to the printer. Fix the margins and make the changes

in
the macro.

The macro uses the default SnagIt file names - and a folder c:\temp.

These
are of course changeable.

Sub InsertImages()
Selection.InsertBreak Type:=wdSectionBreakNextPage
With Selection.PageSetup
.Orientation = wdOrientPortrait
.TopMargin = CentimetersToPoints(0)
.BottomMargin = CentimetersToPoints(0)
.LeftMargin = CentimetersToPoints(0)
.RightMargin = CentimetersToPoints(0)
End With
Count = 0
Do
On Error GoTo oops
sFile = "C:\Temp\Allfiles-000" & Count & ".jpg"
Selection.InlineShapes.AddPicture FileName:=sFile
Count = Count + 1
Loop
oops:
End Sub


--

Graham Mayor - Word MVP

My web site www.gmayor.com
Word MVP web site http://word.mvps.org




Holly wrote:
I work in a law firm where I am frequently asked if there
is a way to insert a PDF file to the end of a Word
document? I am faced with this question at least once a
month from our users. I've discovered I can convert the
PDF to individual JPG files, but it's a pain to insert
them into Word (as graphic images) manually page by page
especially if there are numerous pages. Any advice?