![]() |
|
#2
|
||||
|
||||
|
Is there a reason for not using SaveAs, or the FileSave dialogue? That said, you could use:
Code:
Dim StrNm As String
StrNm = InputBox("PDF File Name")
StrNm = "P:\My Documents\Excel\Stock Information\Good Files\PDF\" & StrNm & ".pdf"
ActiveDocument.ExportAsFixedFormat OutputFileName:=StrNm, _
ExportFormat:=wdExportFormatPDF, OpenAfterExport:=True, _
OptimizeFor:=wdExportOptimizeForPrint, Range:=wdExportAllDocument, _
Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
BitmapMissingFonts:=True, UseISO19005_1:=False
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
VBA to Insert variable rows based on a data in active cell
|
Marcia | Excel Programming | 4 | 07-28-2018 10:02 AM |
Insert a Variable Row to SUM SubTotal
|
ChrisOK | Excel Programming | 3 | 02-12-2018 10:46 AM |
| I want to create a bar chart of multiple variable. Then I need to draw trend lin of those variable | shimulsiddiquee | Excel | 1 | 05-16-2017 07:39 AM |
| Run Time Error '91': Object variable or With block variable not set using Catalogue Mailmerge | Berryblue | Mail Merge | 1 | 11-13-2014 05:36 PM |
insert auto path & file name in ppt 2013
|
rideninc | PowerPoint | 1 | 01-28-2014 05:38 AM |