I wonder if anyone can help with this please . . .

I am inserting images via some code provided previously from Robert via this NG; I then have code which saves the XL workbook as a PDF but the quality of the images is degraded substantially in the PDF.

My question is, does anyone know why that would be the case, and more importantly, how to resolve?

I've placed both pieces of code below.

TIA

Steve

Sub Insert_Pic_A20()

Application.ScreenUpdating = False
Range("A20").Select

SendKeys "{Enter}"
Application.Dialogs(xlDialogInsertPicture).Show

Selection.ShapeRange.LockAspectRatio = msoFalse
Selection.ShapeRange.Width = 272#
Selection.ShapeRange.Height = 152#

Application.ScreenUpdating = True
End Sub


Sub Save_As_PDF()

Dim myFile As String, myFolder As String

myFolder = "C:\Field Reports"

If Not IsFolderExists(myFolder) Then
CreateObject("Scripting.FileSystemObject").CreateF older myFolder
End If

ChDir "C:\Field Reports"


filname = InputBox("Please enter the name for the PDF file:", "Filename")

ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Field Reports\" & filname & ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True


End Sub

Typically, xlQualityStandard will degrade any hi-res image because its
DPI output is very low. Anything below 300dpi will usually render
'fuzzy' and so a higher setting should be chosen. MSO doesn't offer
much in the way of output quality options (or any other preferences)
for their fixed format feature.

FWIW
I do a lot of instruction manuals and user guides in Excel. I try to
resize my images to the 'LargeWeb' spec in the image viewer so that
they're optimized for CHM, WebHelp, hard copy print, and ebook output.
The latter could be pdf or html.exe file format. The resulting quality
is the same everywhere the image is used.

I also use Acrobat Pro for the ebooks. This includes the Adobe PDF
printer which allows me to customize output settings to the 'nines' and
so I prefer to use this over the fixed format feature. Once generated,
the PDF opens in Acrobat and I add the TOC and other stuff there.

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion

Hi Garry

I've also tried xlQualityHigh and the result didn't appear a whole lot better than xlQualityStandard.

When you say "I try to resize my images to the 'LargeWeb' spec in the image viewer so that they're optimized for CHM, WebHelp, hard copy print, and ebook output," where is that . . . I suspect it's not in Excel?

The issue I have is that these macros are a part of a larger workbook where engineers go out to inspect equipment, take photos that go into an Excel report spreadsheet. Macros import the photos to specific cells in the spreadsheet; then one of the macros Saves As a PDF. The idea is to get the photos in the spreadsheet and then a pdf with as little effort as possible on their part. The result for me is that I'm a bit hogtied as to what I can do - using Acrobat Pro or any other app "external" to Excel is probably out of the question. I suspect I'm going to have an option that totally protects the workbook, saves as a new name, rather than as a PDF. Unless you have any better ideas (Always welcome!)?

Thanks very much (again) for your help.

Steve

Hi Garry

I've also tried xlQualityHigh and the result didn't appear a whole
lot better than xlQualityStandard.

When you say "I try to resize my images to the 'LargeWeb' spec in the
image viewer so that they're optimized for CHM, WebHelp, hard copy
print, and ebook output," where is that . . . I suspect it's not in
Excel?

The issue I have is that these macros are a part of a larger workbook
where engineers go out to inspect equipment, take photos that go into
an Excel report spreadsheet. Macros import the photos to specific
cells in the spreadsheet; then one of the macros Saves As a PDF. The
idea is to get the photos in the spreadsheet and then a pdf with as
little effort as possible on their part. The result for me is that
I'm a bit hogtied as to what I can do - using Acrobat Pro or any
other app "external" to Excel is probably out of the question. I
suspect I'm going to have an option that totally protects the
workbook, saves as a new name, rather than as a PDF. Unless you have
any better ideas (Always welcome!)?

Thanks very much (again) for your help.

Steve

Steve,
I have a simlar scenario where photos are taken during a retrofit for
DPF installations, and another for roofing repairs. You just need a
good PDF printer that lets you specify the output resolution DPI! Has
nothing to do with Excel, but rather Adobe PDF being used. You can
specify up to 1200DPI quality for resolution as well as 'print quality'
for the general output. 'Print quality' is used for printing hardcopy
books/docs, or ebook PDFs.

I use either Office Picture Manager or Windows Photo Viewer for the
resizing mentioned above. I used to do this in Paint Shop Pro when
there were few to do, but either of the aforementioned apps are better
for batch resizing to more responsible file sizes while maintaining
decent publishing quality.

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion