Word to Jpeg conversion

[Vijayaram B]

Hi,
Is there any one to help me out.

I copied the content of a word document(should have the print border guide
extended than normal page layout) and created a jpeg image by using the below
code. But we see the truncation issue in the left and right side of the
captured image. Please help to resolve the truncation issue in the captured
image.

On Error GoTo err:
Dim x As New Word.Application
Dim w As New Word.Document

Set w = x.Documents.Open("C:\Vet11.doc")
Clipboard.Clear
With w.Application.Selection
.WholeStory
.CopyAsPicture
Picture1.Picture = Clipboard.GetData(3)
SavePicture Clipboard.GetData(3), "c:\vet1.bmp"
End With
w.Close
Set w = Nothing
Set x = Nothing
MsgBox "successfully done"
Exit Sub
err:
MsgBox err.Description

 

[Graham Mayor]

Do yourself a favour - install the trial version of SnagIt and send the
document to the SnagIt 'printer' driver.

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>