Q regarding double-click on protected cell

[auto.pilot]

Using XL 2010, some worksheets are protected. Formulas within several protected cells refer to other worksheets. Clicking on a protected cell, I get "The cell or chart that you are trying to change is protected and therefore read-only." If I then click OK or the red X or press the escape key, I am sent to the other sheet which was referenced in the protected cell. Is there a way to prevent this? Ideally, I'd like to remain on the protected sheet and simply click Unprotect Sheet.

Thanks

jim

 

[Jaafar Tribak]

Try putting theis in the protected worksheet module :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Me.ProtectContents Then
        Application.OnTime Now, Me.CodeName & ".BackHere"
    End If
End Sub

Private Sub BackHere()
    Me.Activate
End Sub