Saving workbook from vba

  • Thread starter Thread starter Don
  • Start date Start date
D

Don

I am wanting to save a workbook from a command button on
the first sheet. How can I bring up the save-as dialog
window in vba ? This can be used by anyone using the file
to save wherever he wishes with any file name.
Many thanks in advance for any assistance.
 
Sub SaveTheFile()
Dim FN As String
FN = Application.GetSaveAsFilename()
If UCase(FN) = "FALSE" Then Exit Sub
ThisWorkbook.SaveAs FN
End Sub

Patrick Molloy
Microsoft Excel MVP
 
Back
Top