Bill,

Use code like the following:

Dim FName As Variant
FName = Application.GetSaveAsFilename( _
InitialFileName:="MyFile.xls", _
filefilter:="Excel Files (*.xls),*.xls")
If FName = False Then
' user cancelled
Else
' user selected FName
End If


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Bill Sturdevant"
wrote in message
...
I am trying to create a button that will pick a value from a
specified cell
and put up a Save As dialog pre-filled with the name of the
file as
Value-I-Picked.xls and the suggested path as the path of the
workbook I
originally opened.

Where can I find suggestions for appropriate code?