VBA SaveAs FileFormat Variable

[Chris Macro]

I am trying to make a File SaveAs macro that can save in different formats.

This Works:

ActiveWorkbook.SaveAs Filename:="C:\Users\Chris\Desktop\Book1.xlsx", _
        FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

This Doesn't Work:

FileFormat = "xlOpenXMLWorkbook"  
        ActiveWorkbook.SaveAs Filename:="C:\Users\Chris\Desktop\Book1.xlsx", _
        FileFormat:=FileFormat, CreateBackup:=False

I'm guessing its because I am setting my FileFormat variable as a string but I am not sure how else to go about making this code variable.

When I try the following code, I get an error stating that an object is required

Set FileFormat = xlOpenXMLWorkbook

 

[JoeMo]

Here are some file format enumerations. You can simply use the number (as in FileFormat:=##) or you can use the bold text (as in xlOpenXMLWorkbook).

50 = xlExcel12 (Excel binary formatted workbook, with or without macros, .xlsb)

51 = xlOpenXMLWorkbook (macro-free Excel workbook, .xlsx)

52 = xlOpenXMLWorkbookMacroEnabled(Excel workbook with or without macros, .xlsm)

56 = xlExcel8 (Excel 97 through Excel 2003 formatted files .xls)

<colgroup><col style="width:48pt" width="64"> </colgroup><tbody>
</tbody>

 

[Chris Macro]

Awesome! I didn't think to use the enumerations. Thanks Joe!

 

[JoeMo]

Awesome! I didn't think to use the enumerations. Thanks Joe!

You are welcome - thanks for the reply.