Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Using "Save As" with a file name selected by cell
I am trying to save a worksheet where the Save As dialog box appears so the
user can choose the location. I need the file name to be predefined from a cell entry. The following works by saving the file as "Data - (A1).xls" where A1 is a variable but it saves in the current folder only. How can I use the Save As dialog box so that the new file name appears by default and the user can then select the location? Sub SaveWithVariableFromCell() Application.DisplayAlerts = False Dim SaveName As String SaveName = ActiveSheet.Range("A1").Text ActiveWorkbook.SaveAs Filename:="Data - " & SaveName & ".xls" End Sub Many thanks |
#2
|
|||
|
|||
So you want to allow the user to control the drive/folder, but you want to
specify the filename? If yes, maybe just asking for the drive/folder would be better: Jim Rech has a BrowseForFolder routine at: http://www.oaltd.co.uk/MVP/Default.htm (look for BrowseForFolder) John Walkenbach has one at: http://j-walk.com/ss/excel/tips/tip29.htm If you and all your users are running xl2002+, take a look at VBA's help for: application.filedialog(msoFileDialogFolderPicker) B Baggins wrote: I am trying to save a worksheet where the Save As dialog box appears so the user can choose the location. I need the file name to be predefined from a cell entry. The following works by saving the file as "Data - (A1).xls" where A1 is a variable but it saves in the current folder only. How can I use the Save As dialog box so that the new file name appears by default and the user can then select the location? Sub SaveWithVariableFromCell() Application.DisplayAlerts = False Dim SaveName As String SaveName = ActiveSheet.Range("A1").Text ActiveWorkbook.SaveAs Filename:="Data - " & SaveName & ".xls" End Sub Many thanks -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Can I get excel to auto save details from a cell into the doc nam. | Excel Worksheet Functions | |||
Perform oiperations relative to initial selected cell | Excel Discussion (Misc queries) | |||
a protected cell w/formula only updates only on file save? | Excel Discussion (Misc queries) | |||
Excell2003 (SP-1) File > Save and File > Save As.. grayed out | Excel Discussion (Misc queries) | |||
How do I use a cell as a referance to a file in a lookup statemen. | Excel Worksheet Functions |