Sub NormalTemplateSave Application.NormalTemplate.Saved = False Application.NormalTemplate.Save End Sub