Run Time error 424 copy form work sheet to make a new file

[mmikem]

Hi all
I having a run time error in a, I call it a export command I am trying to copy a portion of a work sheet and open a file dialog box to save it as a new file
Below is the code I have so far it errors at the ActiveWorkbook.SaveAs FileName.xlsm
any Help please and thanks

Please Login or Register  to view this content.

[JLGWhiz]

I think all you need is

Please Login or Register  to view this content.

The workbook was opened as a .xlsm macro enabled workbook and the variable 'FileName' is for the same workbook name that was opened. The syntax is incorrect for the SaveAs statement as you have it.

Please Login or Register  to view this content.

But even that could give undesired results if FilName includes the full file path that was in the GetOpenFilename box. You need to know exactly what your variables contatin when you are using them like that.

[mmikem]

The save error has been solved but it will not let predefine a file name it saves as sheet1 even if I change the file name

[JLGWhiz]

The way the code in Post #1 is written is confusing because it appears that the variable 'FileName' is initialized with the file opened through the 'GetSaveAsFileName' dialog box. Then it goes on to attempt to do a 'SaveAs' using he same variable value for 'FileName'. That would automatically throw an error for an alert message for a duplicate file name. That was why I suggested just using the 'ActiveWorkbook.Save' method. If you want to use the 'SaveAs' method so you can change the file name then you need to use either 1) change the value of the variable 'FileName' to something other than what was taken from the dialog box or 2) just use a different name in the clear.
1)

Please Login or Register  to view this content.

2)

Please Login or Register  to view this content.

Hope this is a little clearer on the issue.
Regards, JLG