I'm creating a 12 question survey in Excel and want to find a way to require
users to provide responses in specific cells. Ideally, I'd like to run a
check on cells I'm requiring a response in and make sure those specific cells
are not blank. If they are blank, I'd like to generate a dialog box warning
that requires them to populate the cells when they try to save the file.

Not sure how to best do this, any suggestions?

Cheers,

Copy this to Thisworkbook module.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI _
As Boolean, Cancel As Boolean)
If Application.CountA(Sheets("Sheet1").Range("A1:C1") ) < 3 Then
Cancel = True
MsgBox "Please fill required cells, save has been cancelled"
End If
End Sub

To access that module right-click on the Excel Icon left of "File" on the
menubar.

Select "View Code". Paste into that module.

Edit the sheetname and range of cells to suit.

Alt + q to return to the Excel window after editing.

Note: if user disables macros the above won't run.


Gord Dibben MS Excel MVP

On Wed, 2 Jul 2008 15:26:00 -0700, The Chad <The
wrote:

I'm creating a 12 question survey in Excel and want to find a way to require
users to provide responses in specific cells. Ideally, I'd like to run a
check on cells I'm requiring a response in and make sure those specific cells
are not blank. If they are blank, I'd like to generate a dialog box warning
that requires them to populate the cells when they try to save the file.

Not sure how to best do this, any suggestions?

Cheers,