lock cells until one cell is filled

G

Guest

I would like to lock a sheet so no information can be filled in any cells
until a certain cell has information selected. Is there a way to do that?
 
C

colofnature

In the Worksheet's code area put in:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If [a1].Value = Empty Then
Cells.Locked = True
[a1].Locked = False
ActiveSheet.Protect password:="whatever"
Else
ActiveSheet.Unprotect password:="whatever"
End If
End Sub

Change the password to something meaningful, change a1's to whichever
cell you want the initial data in, uncheck the Locked property of the
cell, protect the worksheet and hey presto!
 
G

Guest

Thanks colofnature but this didn't work.
I have a project estimate sheet I'm working on.
I have all but a handful of cells locked.
What I want it to do is lock the unlocked cells until cell "c4" has
information in it.
That way my users are forced to enter something here.
Right now, it's hit and miss whether they fill in that blank.
When I used the formula you gave me it allowed me to continue to fill in the
blanks regardless of information being entered into cell "c4".

Thanks,

Debbie
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top