How about:

Sub bw()
Dim b As Boolean
b = ActiveSheet.ProtectContents
MsgBox (b)
If b Then
'do something
Else
'do something else
End If
End Sub

--
Gary''s Student - gsnu200724


"bw" wrote:

If someone Protects or Unprotects a worksheet, how does one "capture"
that fact so that I will know when to cause a manual Calculation?

--

I think you may be missing my point here. If you Protect or Unprotect
the worksheet (not using code), how will I know that you have done that?


"Gary''s Student" wrote in
message ...
How about:

Sub bw()
Dim b As Boolean
b = ActiveSheet.ProtectContents
MsgBox (b)
If b Then
'do something
Else
'do something else
End If
End Sub

--
Gary''s Student - gsnu200724


"bw" wrote:

If someone Protects or Unprotects a worksheet, how does one "capture"
that fact so that I will know when to cause a manual Calculation?

--

The point is:

Suppose that I have arbitrarily protected or unprotected any worksheet
(either manually or via VBA) and then gave the worksheet to you. By running
the sub, you (or VBA) can detect what I have done.
--
Gary''s Student - gsnu200725