Rozent

=Cell("Protect")

will return 1 if the cell is locked and 0 if the cell is unlocked and the
worksheet protected

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
www.nickhodge.co.uk
HIS


"?????" wrote in message
...
is ther any formula that can sow "1" if the activesheet is protected
and "0" if not

rozent