Hi socrates01,
Modifying you code to save as PDF is quite simple! Change:
ActiveDocument.SaveAs FileName:=DocName
to:
ActiveDocument.SaveAs FileName:=DocName, FileFormat:=wdFormatPDF
PS: When posting code, please use code tags.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
|