hi
yes. but it would be nice to know which cell the leave is in and what the
quota is but in it's simplest form, it might look something like this.....
leave in A1. quota = 50
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Range("A1").Value 50 Then
MsgBox "leave exceeds quota. save not allowed"
Cancel = True
End If
End Sub

this is workbook code.
Alt+F11. in the project window(far left) expand the project(file). double
click "ThisWorkbook". paste above code into this workbook module.
modify if needed.

Regards
FSt1

"Jim Lavery" wrote:

Is there an code that would stop an excel file being saved if a certain
number was exceeded.
Example:- entering leave which exceeds the quota thus stoppping the user
saving the file.