Hi, can anyone help me with this: -

I have assigned the following macro to a command button: -

Sub savebook()
Dim FPATH As String
FPATH = "T:\DEVELOPMENT\P134 MODULAR SIGNALLING\DEVELOPMENT\SPREADSHEETS\Production Scans\ILS Production Batch\Multi Aspect\"
ActiveWorkbook.SaveAs FPATH & Range("G2").value & ".XLSM"
End Sub

When I press the command button I get the following message: -

Run-time error '1004':

This extension cannot be used with the selected file type. Change the file extension in the file name text box or select a different file type by changing the save as type.

The code works if I change to a .XLS file but I need all the macros to be able to run in the workbook.

I'm using excel 2007.

Thanks in advance.