Try
If ActiveCell.Locked = True Then
MsgBox ("You can't change the contents of this Cell. It is locked &
protected.")
End If
--
Pl click the ''''Yes'''' button
(if you see it - don''''t worry if you don''''t),
if this answer was helpful.



"FARAZ QURESHI" wrote:

What would be the appropriate code for finding whether the active cell is
locked and protected?

Run-time error '438':
Object doesn't support this property or method

is being returned on the following piece:

If ActiveCell.Protected = True Then
MsgBox ("You can't change the contents of this Cell. It is locked &
protected.")

Help from you experts is sought!

Thanx in advance.