Save As situation

Afternoon all,

I have a file (a *.xltm file) which I have "protected" as follow:

When the user opens the file as a template file, I have the SaveAs and Save functions disabled.

The user then has to select a directory in which to save the *.xlsm file, over which my code has control of the name of the file, as well as the file extension.

If the file is not a template file, the Save and Save As works as usual.

This all works perfect, the problem comes in that the directory selection window pops up twice, and I can not undrstand why.

I have attached the template file.

If someone can please indicate to me where I have gone wrong, it will be greatly appreciated.

Try turning events off before doing the save:

        'Step 5: Now save a copy of the file in the current
            Application.EnableEvents = False
            ThisWorkbook.SaveAs Filename:=file_NewName, _
                                FileFormat:=52
'                                CreateBackup:=False
            Application.EnableEvents = True

Dom

Hi Dom,

So simple but it works like a charm, thanks.