Event/Method for Unprotecting worksheet
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 |
Event/Method for Unprotecting worksheet
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 |
All times are GMT +1. The time now is 03:31 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com