Lock selected cells without protecting worksheet

Folks,
I was wondering if it is possible to lock selected cells without protecting a worksheet? I know how to unlock selected cells while the remaining cells are locked by protecting the worksheet.
Frank FreeseAsked:
Who is Participating?
 
Martin LissConnect With a Mentor Older than dirtCommented:
Or you can simply do something like in this example which "protects" A3 and A5.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Target.Column = 1 Then
        If Target.Row = 3 Or Target.Row = 5 Then
            Beep
           Cells(Target.Row, Target.Column).Offset(0, 1).Select
        End If
    End If
    
End Sub

Open in new window

0
 
DephaultCommented:
Right click on the cells and go to the Protection tab and choose whether its locked or not there.

Protecting then enables the lock. But you could Protect the sheet and set a blank password.

OR

You could also detect the change in an event and stop the edit. Maybe expand on your question for this one.
0
 
Frank FreeseAuthor Commented:
Martin,
Let me make sure I understand your solution. This code would keep me from protecting a worksheet yet protect selected cells from changes?
0
Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

 
Martin LissOlder than dirtCommented:
Yes. In my example if the user tries to select A3 or A5, he'll hear a beep and the cursor will move one cell to the right.
0
 
Frank FreeseAuthor Commented:
thanks Martin - it looks like I can apply this to my model.
0
 
Frank FreeseAuthor Commented:
great work - I am grateful, as always
0
 
Martin LissOlder than dirtCommented:
And as always you're welcome and I'm glad I was able to help.

Marty - MVP 2009 to 2013
0
 
DephaultCommented:
So what I said initially didn't count?

'detect the change in an event and stop the edit' is exactly the answer is you got. Dont I deserve some points?
0
 
Martin LissOlder than dirtCommented:
If fh_freese wants to get moderator support to change his points assignment I don't have a problem.
0
 
Frank FreeseAuthor Commented:
Dephault,
Please do not misunderstand. I am grateful for your response even though I was already aware of the option you proposed which really did not provide to me a solution that Martin did. You've been very helpful in the past and I look forward to working with you going forward. I look for a "shooting solution" and Martin provided that for me.
Thank you, once again.
0
 
Frank FreeseAuthor Commented:
Martin,
Would your solution be in the Activate worksheet section as a sub-procedure?
0
 
Martin LissOlder than dirtCommented:
It should be in the Worksheet_Change event exactly like I posted. If you don't already have code in that event, just go to Visual Basic, Open the code page for the sheet and copy/paste my complete example.
0
 
Frank FreeseAuthor Commented:
Did that - does beep but changes are allowed?
0
 
Frank FreeseAuthor Commented:
Martin,
The reason for being selective is that if I protect the sheet then the user does not have access to Conditional Formatting which is the exercises I am working on now. I'd like to protect most of the worksheet, yet leave access to Conditional Formatting. Thought you might like to know for such a "strange" need.
0
 
Frank FreeseAuthor Commented:
Whoa! It's working now. I rebooted this workstation, launched Excel and now it is working.
It appears that the best thing ging forward is to reboot this networked workstation first to make sure everything is OK.
Thanks Martin
0
 
Martin LissOlder than dirtCommented:
If you protect the sheet like this you shouldn't need any code.

Allow formatting
0
 
Frank FreeseAuthor Commented:
Always looking after me! That's perfect....
Thanks for the follow-up.
0
 
Martin LissOlder than dirtCommented:
You're welcome.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.