Workbook.save - "the following features cannot be saved in macro-free workbooks..."

excel vba save xlsm
Sayjota picture Sayjota · Jul 24, 2015 · Viewed 12.5k times · Source

My sub opens up a .xlsm file in a new Excel instance, makes changes to the file, and saves the changes.

However, despite the fact that the file being opened is .xlsm, upon workbook.save I get the alert message "the following features cannot be saved in macro-free workbooks..."

This doesn't make sense to me because the file is .xlsm. Any ideas?

Edit: I believe I found the source of the problem. Although the variable "path" contains C:\file.xlsm, wkb.path is empty. (see Debug.print's below). Why is the wkb.path empty?

    Set XL = New Excel.Application
    XL.Visible = False

    For Each Path In XLSMPaths

        Set wkb = XL.Workbooks.Add(Path)

        Debug.Print Path      ' "C:\file.xlsm" 
        Debug.Print wkb.path  ' ""
        Debug.print wkb.name  ' "file"      

        wkb.Save   '<- alert message "The following features cannot be saved in macro-free workbooks..."

    Next Path

Answer

Darren H picture Darren H · Jul 24, 2015

By default, the .save method will save the file as .xls or .xlsx (dependant on your version of excel), you need to force this with .saveas

wkb.SaveAs Filename:=MyNewPathFilename, FileFormat:=xlOpenXMLWorkbookMacroEnabled

obviously change the variable 'MyNewPathFilename' to whatever you want to save the file as, probably want to take the Path and check it ends in .xlsm then pass it into this variable

Related questions

how to save a sheet in VBA

I'm building a form that when you fill it up, it should generate 2 files as output. In order to do that I have 2 sheets in the background that I fill up depending on what the user entered a button to …

Read More
How to do a "Save As" in vba code, saving my current Excel workbook with datestamp?

I have an Excel Workbook that on form button click I want to save a copy of the workbook with the filename being the current date. I keep trying the the following ActiveWorkbook.SaveAs ("\\filePath\FormFlow To MSExcel\" & Left(…

Read More
Saving as .xlsx in different directory in vba

I am trying to use the SaveAs method to save a .csv document as a .xls document. However, when I try and designate the folder, it fails. For example, it will save to some default directory (my documents, which is …

Read More