How to Make Users enter compulsary information in cells

[ap1200]

Is it possible to set parameters whereby users have to enter information on to certain cells before it allows them to close and save spreadsheet?

 

[Lewiy]

This will prevent users from closing the workbook if cell A1 on sheet1 is not filled in. You would just need to add conditions based on your requirements.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Sheets("Sheet1").Range("A1") = "" Then
    MsgBox "You must enter data in Sheet1!A1"
    Cancel = True
End If
End Sub