Save As File Format
 

Hello-

We have an Excel 03 SPreasheet that has a Save as Macro included as below.
We would like to modify the macro to allow the file to be saved as an Excel
File and a pdf file (we have upgraded to 07). What file type would I
specifiy?

ChDir "C:\Sections\CurrentSections"
ActiveWorkbook.SaveAs Filename:="C:\Sections\CurrentSections" & _
Range("E1").Value & "-Section.xls", _
FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

ChDir "C:\Sections\CurrentSections"
ActiveWorkbook.SaveAs Filename:="C:Sections\CurrentSections" & _
Range("E1").Value & "-Section.pdf", _
FileFormat:=xlExcel8, Password:="", WriteResPassword:="",
ReadOnlyRecommended:=False, CreateBackup:=False

Thanks!

Save As File Format
 

Hi betany70

See this page for excel workbooks
http://www.rondebruin.nl/saveas.htm

This one for PDF
http://www.rondebruin.nl/pdf.htm



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"betany70" wrote in message ...
Hello-

We have an Excel 03 SPreasheet that has a Save as Macro included as below.
We would like to modify the macro to allow the file to be saved as an Excel
File and a pdf file (we have upgraded to 07). What file type would I
specifiy?

ChDir "C:\Sections\CurrentSections"
ActiveWorkbook.SaveAs Filename:="C:\Sections\CurrentSections" & _
Range("E1").Value & "-Section.xls", _
FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

ChDir "C:\Sections\CurrentSections"
ActiveWorkbook.SaveAs Filename:="C:Sections\CurrentSections" & _
Range("E1").Value & "-Section.pdf", _
FileFormat:=xlExcel8, Password:="", WriteResPassword:="",
ReadOnlyRecommended:=False, CreateBackup:=False

Thanks!