I am looking for help as I am not a programmer. I would like to be able to do the following:
- to silently pdf the open Word document (no dialogues)
- the output file name the same as the input file name
- the output folder the same the input folder
- automatically overwrite if the pdf file already exists
- photographs in the text not downsized below 600 dpi
There is a code (see below) that does all of the above but the last point . It uses "save as" function in MS Word which reduces the dpi of photographs to too low level. For the documents with photographs I need to manually use the "Microsoft print to PDF" which gives decent quality of pictures.
A macro that prints using the "Microsoft print to PDF" meeting all of the criteria above points would be great. Could anybody help ?
Sub Silent_save_to_PDF()
'
' Silent Save_to_PDF Macro
'
ActiveDocument.ExportAsFixedFormat OutputFileName:= _
Replace(ActiveDocument.FullName, ".docx", ".pdf") , _
ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
wdExportOptimizeForPrint, Range:=wdExportAllDocument, Item:= _
wdExportDocumentContent, IncludeDocProps:=False, KeepIRM:=True, _
CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
BitmapMissingFonts:=True, UseISO19005_1:=False
End Sub