Excel - Allows SaveAs Only

[Hack]

Well in that case, Hack, would you like the user not to be able to exit by clicking on 'X' button? Each time the user clicks on the 'X' button, he will be prompted to do a Save As... If Yes then this should help...

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    If Not saveasUI = True Then
        MsgBox "Please use Save As To Save this File"
        Cancel = True
    End If
End Sub

If you don't want the user to exit by clickin on the 'X' button then simply use the above code without the MSGBOX....

Hope this will satisfy the department manager

What is: saveasUI?

Is that a variable I need to declare or Excel will yell at me?