Thanks for your response gmayor...
I intended to convert part of word document file (Specified Page Range) in PDF Format. And I succeeded using below mentioned code.
Sub SavePageRangeasPDF()
'
' SavePageRangeasPDF Macro
'
ActiveDocument.ExportAsFixedFormat _
OutputFileName:=CurrentFolder & "Hello All" & ".pdf", _
ExportFormat:=wdExportFormatPDF, _
Range:=wdExportFromTo, From:=2, To:=11
End Sub
In this similar way I want to save a duplicate copy of a word file (Specified Page Range) in docx format with SaveAs Dialogue box pop up to change the file name.
Please help me in generating a code for this
|