Can I get Excel not to save a file if certain information is not i

[Guest]

I would like to know if there is a way that I can set up a file that will not
allow someone to close it until certain cells are filled in.

 

[Bernie Deitrick]

In the Thisworkbook's codemodule, put this type of code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Worksheets("Sheet1").Range("A1").Value = "" Then Cancel = True
If Worksheets("Sheet2").Range("B2").Value = "" Then Cancel = True
' and so on for each cell that you require to be filled in
End Sub

 

[Chip Pearson]

This can be done only with VBA code. In the ThisWorkbook code
module, use code similar to the following:


Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Range("A1") = "" Then ' change A1 to the desired cell
Cancel = True
End If
End Sub



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



in message
news:[email protected]...

 

[Guest]

I am putting this info into Visual Basic Editor under Module - it is not
working I pasted yout code and inserted my information (i.e. sheet names and
cell numbers) but it is not working - do you know what I am doig wrong?

 

[Bernie Deitrick]

You need to double-click on the ThisWorkbook object of your workbook within the project explorer -
press Ctrl-R to get the project explorer to show - and then paste the code in the window that
appears.

HTH,
Bernie
MS Excel MVP