Save as
Apply this event macro:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
fileSaveName =
Application.GetSaveAsFilename(InitialFileName:="Ce rtain_path\" & Range("A1"))
End Sub
Replace Certain_path by a real path name!
Post if you need help to install it!
Regards,
Stefi
€ždvya€ť ezt Ă*rta:
Ive created a template for my office staff to use to create invoices. Im
looking for a way that when they choose save -
1) the box that opens up will automatically be directed to a certain folder
2) and the file name will be the contents of "A1".
Thank You
|