Hello
I am trying to export all the images in a generated word document...
I wound some code on the net such as this one:
For Each i As Word.InlineShape In mWordDocument.InlineShapes
i.Select()
mWordApplication.Selection.CopyAsPicture()
Dim bmp As Image = Clipboard.GetImage()
If bmp IsNot Nothing Then
If bmp.Size.Width > MINIMUM_BITMAP_WIDTH Then
mMapNoImage.Add(iNO, bmp)
iNO += 1
End If
End If
Next
This works somewhat... but the quality of the image if not adequate.
Also sometime it only gets part of the image!
Further whereas in the word document I can resize the image and it keeps its clarity, the images exported has poor resolution.
How can I extract all the images and have a jog file with same quality as tat of the object embedded within the word document ???
Thanks for any hints
Try these methods,
save the document as a web page using the following steps:
1. On the File menu click Save as Web Page
2. In the Save As drop down select Web Page (*.htm; *.html)
Images will be extracted from the document and placed in the folder named <DocumentName>_files in the same location as the saved web page.