Cancel Workbook Close (XL97; SR2)

[jstevens]

Does anyone know if it is possible to cancel a workbook close process via vba code? I'm using the following code and if two ranges are not equal a message appears indicating so but I need to cancel the close process itself.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Range("R_one") <> Range("R_two") Then
MsgBox "Two Ranges do not equal"
' Insert Code Here to cancel workbook close feature...
End If
End Sub

Thanks,
John

[Andrew Cronnolly]

<' Insert Code Here to cancel workbook close feature...>

Replace above with <pre>Cancel = True </pre>


Andrew C

[jstevens]

Andrew,

Thank You!

What can I say, so close and yet so far away from the solution.