You can set up your workbook so that it will not allow
the user to close the workbook without filling in certain
cell. For example:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim checkRng As Range
Set checkRng = Sheets("Sheet1").Range("A1")
If checkRng.Value = "" Then
Cancel = True
MsgBox "Please fill in " & _
checkRng.Address(False, False) & "."
End If
End Sub
---
Place this in the ThisWorkbook module of your workbook.
HTH
Jason
Atlanta, GA
-----Original Message-----
Excel 2000
.
|