See your other post for a number of questions I have.

Suppose the filename was in cell C5 one could use something like this to
save the file with that name when you clicked the Save toolbar button.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ActiveWorkbook.SaveAs Filename:=Sheets("Sheet1").[C5]
Cancel = True
End Sub

--
If this helps, please click the Yes button.

Cheers,
Shane Devenshire


"pravin" wrote:

I generate quiotations from a template and create a code name for each
quotation in cells B7 to F7 as follows.
TEMPLATE CODE XXX
QUOTATION CODE BUZ 7/07/2009 abc 156

Can I save this in a file automatically using a micro in a file having the
code name (BUZ,DEF,..) and the quotation number (156,157,...)

--
excelforautomatinginvoicing