I want to use the "Before Save" event to force users to save a template with
a certain naming convention. (The name must contain the words Air
Container)

Is this possible. For example in the Before Save event procedure it may say
something like

If WorkBook.Name < "*Air Container*" (if true then it would prevent the
save from completing.)

Thanks in advance
AD108

Bob Philips gave me an excellent solution to a similar problem. See thread
"SaveAs with a pre-defined filename" in this group!

Regards,
Stefi


€žAD108€� ezt Ã*rta:

I want to use the "Before Save" event to force users to save a template with
a certain naming convention. (The name must contain the words Air
Container)

Is this possible. For example in the Before Save event procedure it may say
something like

If WorkBook.Name < "*Air Container*" (if true then it would prevent the
save from completing.)

Thanks in advance
AD108

On Tue, 27 Jun 2006 20:08:17 -1000, AD108 wrote:

I want to use the "Before Save" event to force users to save a template with
a certain naming convention. (The name must contain the words Air
Container)

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
If Not (ThisWorkbook.Name Like "*Air Container*") Then Cancel = True
End Sub

--
PL

Thanks alot


"Piotr Lipski" wrote in
message ...
On Tue, 27 Jun 2006 20:08:17 -1000, AD108 wrote:

I want to use the "Before Save" event to force users to save a template
with
a certain naming convention. (The name must contain the words Air
Container)

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
If Not (ThisWorkbook.Name Like "*Air Container*") Then Cancel = True
End Sub

--
PL