Excel Save As With Different File Type

[JADownie]

Hi,

I currently have a macro in my file (XLSM) which has a step where the user saves out the workbook in the current format.

Sub SaveAS_Final()
Dim strName As String


SvName = Sheets("Instructions").Range("C51")

Application.Dialogs(xlDialogSaveAs).Show SvName


End Sub


But since my file is an XLSM file, when the Save As window pops up, it defaults to XLSM, but I actually want to save as an XLSX file. Is there anyway to tweak my current code to make that change in file type instead of the user having to manually change?

Thanks for any tips!

 

[CodeNinja]

Check out this thread: xlSaveAsdialog changing save as file type

Good luck,
CN.

 

[CodeNinja]

Just a little more digging found this... Try Application.Dialogs(xlDialogSaveAs).Show SvName, 51


51 = XLSX
52 = XLSM

CN.

 

[JADownie]

Hi,

Does anyone know what the code # is for XLM? Currently my files saves as XLS but I would like it to save as an XLM isntead....


Application.Dialogs(xlDialogSaveAs).Show SvName, 51

 

[Fluff]

Take a look at Ron de Bruin' site
https://www.rondebruin.nl/win/s5/win001.htm