Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

SaveAs cell value ?

Status
Not open for further replies.

dezian

Technical User
Jul 29, 2003
21
GB
Save as problems ?

Could any help with this, I need to use a cell value as the file name, and then save to a specific directory. I have the sintax to get the cell value and save, but do not know how to save to a specific place.

The code I already have is:

ActiveWorkbook.SaveAs FileName:=ActiveSheet.Range("G7").Value & ".xls"

Any one Help Please.

Cheers Andy
 
This seems to work:

ActiveWorkbook.SaveAs Filename:= _
"C:\mypath\" & ActiveSheet.Range("A1").Value & ".xls"

________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first

'If we're supposed to work in Hex, why have we only got A fingers?'
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top