Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
SaveAs Filename and FileFormat in Vs2007
Using Excel 2007 (GRR!!), what do I change the FileFormat:=xlNormal (in the
code below) to to save as xlsm format? The closest I could glean from Help was.....xlOpenXMLWorkbookMacroEnabled But that doesn't seem to do it. ActiveWorkbook.SaveAs Filename:= _ "C:\Documents and Settings\User\My Documents\Lou's Accounts\" & Worksheets("Invoice").Range("I1").Text, _ FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False Rob |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
SaveAs Filename and FileFormat in Vs2007
Hi Rob
The following macro worked fine for me. Sub SaveMacEnabled() Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:="C:\Excel\Book3.xlsm", FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False Application.DisplayAlerts = False End Sub -- Regards Roger Govier "RobN" wrote in message ... Using Excel 2007 (GRR!!), what do I change the FileFormat:=xlNormal (in the code below) to to save as xlsm format? The closest I could glean from Help was.....xlOpenXMLWorkbookMacroEnabled But that doesn't seem to do it. ActiveWorkbook.SaveAs Filename:= _ "C:\Documents and Settings\User\My Documents\Lou's Accounts\" & Worksheets("Invoice").Range("I1").Text, _ FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False Rob |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
SaveAs Filename and FileFormat in Vs2007
Hi RobN
More info about the formats you can find on this page http://www.rondebruin.nl/saveas.htm -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "RobN" wrote in message ... Using Excel 2007 (GRR!!), what do I change the FileFormat:=xlNormal (in the code below) to to save as xlsm format? The closest I could glean from Help was.....xlOpenXMLWorkbookMacroEnabled But that doesn't seem to do it. ActiveWorkbook.SaveAs Filename:= _ "C:\Documents and Settings\User\My Documents\Lou's Accounts\" & Worksheets("Invoice").Range("I1").Text, _ FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False Rob |
#4
Posted to microsoft.public.excel.misc
|
|||
|
|||
SaveAs Filename and FileFormat in Vs2007
Good on ya Ron....Great info, thanks!
Rob "Ron de Bruin" wrote in message ... Hi RobN More info about the formats you can find on this page http://www.rondebruin.nl/saveas.htm -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "RobN" wrote in message ... Using Excel 2007 (GRR!!), what do I change the FileFormat:=xlNormal (in the code below) to to save as xlsm format? The closest I could glean from Help was.....xlOpenXMLWorkbookMacroEnabled But that doesn't seem to do it. ActiveWorkbook.SaveAs Filename:= _ "C:\Documents and Settings\User\My Documents\Lou's Accounts\" & Worksheets("Invoice").Range("I1").Text, _ FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False Rob |
#5
Posted to microsoft.public.excel.misc
|
|||
|
|||
SaveAs Filename and FileFormat in Vs2007
Thanks Roger,
I have it working now by putting the xlsm extension into the filename as I noticed you had done. It seems version2007 is not as intelligent as the previous version which automatically did that for me! (Yet another complaint about this clumsy version of the XL program.) Rob "Roger Govier" wrote in message ... Hi Rob The following macro worked fine for me. Sub SaveMacEnabled() Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:="C:\Excel\Book3.xlsm", FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False Application.DisplayAlerts = False End Sub -- Regards Roger Govier "RobN" wrote in message ... Using Excel 2007 (GRR!!), what do I change the FileFormat:=xlNormal (in the code below) to to save as xlsm format? The closest I could glean from Help was.....xlOpenXMLWorkbookMacroEnabled But that doesn't seem to do it. ActiveWorkbook.SaveAs Filename:= _ "C:\Documents and Settings\User\My Documents\Lou's Accounts\" & Worksheets("Invoice").Range("I1").Text, _ FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False Rob |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Passwords, Macro Security and Vs2007 | Excel Discussion (Misc queries) | |||
SaveAs | Excel Worksheet Functions | |||
set filename to <filename-date on open | Excel Worksheet Functions | |||
SaveAs using two cells for filename | Excel Discussion (Misc queries) | |||
Max charactors for 'ActiveWorkbook.SaveAs Filename'? | Excel Worksheet Functions |