You want to write a macro like the one below with a lot of error checking.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
Cancel as Boolean)
a = MsgBox("Do you really want to save the workbook?", vbYesNo)
If a = vbNo Then Cancel = True
End Sub


"rp2chil" wrote:

Hi, I can't find anyting on this in the forum.

I have a worksheet that is a questionnaire (i.e. 40 question). I need the
users to respond to each question. I want to ensure that each question is
answered with one response (i..e each User to be sure to pick one answer, not
two).

In a perfect world, I also would like excel not save the worksheet and set
up an error to remind the user that question #___ is not answered, for
example.

I know I"m asking a lot, however, is there a way to achieve these two things?

Thanks so much.