VBA SaveAs Value

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have a startup macro on one of my worksheets. It has the user input a
batch number into cell a1, and then it saves the file as the batch number.
The batch number is something like 01.ABC.255. When I try to run the macro
listed below, the file saves as a .255 file instead of a .xls file.

ActiveWorkbook.SaveAs Filename:=ActiveCell.Value

I've tried to add text and file extensions after the "value", but cant get
it to work.
Ideally I would like the user to type in 01.ABC.255 and have the file saved
as 01.ABC.255.area1.xls

Thanks
 
If I knew that .xls wasn't part of the value, I'd use:

ActiveWorkbook.SaveAs Filename:=ActiveCell.Value & ".xls", _
fileformat:=xlworkbooknormal
 
That does it. Thanks for your help.

Dave Peterson said:
If I knew that .xls wasn't part of the value, I'd use:

ActiveWorkbook.SaveAs Filename:=ActiveCell.Value & ".xls", _
fileformat:=xlworkbooknormal
Click to expand...
 
In your code?

ActiveWorkbook.SaveAs Filename:="C:\my documents\excel\" & _
ActiveCell.Value & ".xls", fileformat:=xlworkbooknormal
 
Back
Top