View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Helmut Helmut is offline
external usenet poster
 
Posts: 111
Default xltm saveas xlsm

I have the following code within an "xltm" file which I want to then save as
"xlsm":

Do
fName = Application.GetSaveAsFilename(InitialFileName:="ku pa",
filefilter:= _
" Excel Macro Enabled Workbook (*.xlsm), *.xlsm,")
Loop Until fName < False
ActiveWorkbook.SaveAs Filename:=fName

I get ERROR on last statement. How can I add "FileFormatValue = 52" to save
the file as a "MacroEnabled"
thanks