Save As Dialog
Derek,
use the GetSaveAsFileName dialog, sort of like thois fileSaveName = Application.GetSaveAsFilename( _ initialfilename:=Range("A1"), _ fileFilter:="Microsoft Excel Files (*.xls), *.xls") If fileSaveName < False Then MsgBox "Save as " & fileSaveName End If -- HTH Bob Phillips "Derek" wrote in message ... When the user selects "Save As..." I would like the dialog box to display a default value (from a cell on a worksheet) for the the name of the file to save. Any help would be appreciated. |
All times are GMT +1. The time now is 08:23 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com