I am trying to allow a user to insert a picture object onto a protected
worksheet in selected cells.

I assume the best method would be to unprotect the worksheet when the
user selects a particular cell and then reprotect it when the
leave....

I have put together the following code but don't have the correct
event/method as it is not firing off...

Any help would be greatly appreciated....




Private Sub Worksheet_Change(ByVal Target As Range)

On Error Resume Next
If ActiveCell.Range("C2:AL2", "C14:AL14", "C26:AL14").Select Then
ActiveSheet.Unprotect
Else: ActiveSheet.Protect True, True, True, True

End Sub


--
jpendegraft


------------------------------------------------------------------------
jpendegraft's Profile: http://www.excelforum.com/member.php...fo&userid=5701
View this thread: http://www.excelforum.com/showthread...hreadid=261753

Hi
try using the selection_change event for this

--
Regards
Frank Kabel
Frankfurt, Germany


jpendegraft wrote:
I am trying to allow a user to insert a picture object onto a
protected worksheet in selected cells.

I assume the best method would be to unprotect the worksheet when the
user selects a particular cell and then reprotect it when the
leave....

I have put together the following code but don't have the correct
event/method as it is not firing off...

Any help would be greatly appreciated....




Private Sub Worksheet_Change(ByVal Target As Range)

On Error Resume Next
If ActiveCell.Range("C2:AL2", "C14:AL14", "C26:AL14").Select Then
ActiveSheet.Unprotect
Else: ActiveSheet.Protect True, True, True, True

End Sub