Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then

'target.column =3 because column c is no 3 column

'you can change password ashish and choose your own

ActiveSheet.Unprotect Password:="ashish"
If Not IsEmpty(Target.Value) And Target.Value = "Yes" Then

Rows(Target.Row & ":" & Target.Row).Select
    Selection.Locked = True
End If
ActiveSheet.Protect Password:="ashish"
Else: End If
End Sub


check this

http://akoul.blogspot.com/2010/06/lock-cell-after-data-entry-from-editing.html



On Thu, Dec 30, 2010 at 10:38 AM, Manish <pansari.man...@gmail.com> wrote:

> Any help/suggestion ???
>
> Thanks,
> Manish
>
> On Dec 29, 3:03 pm, Manish Pansari <pansari.man...@gmail.com> wrote:
> > Dear EE,
> >
> > Is it possible to lock the entire row/selected cell based on condition
> > in particular Cell.
> > for example, I want to lock the row based on value in column A. If
> > macro found value "yes" in cell A1 & A5, Macro will lock the row 1 &
> > row 5.
> >
> > I hope its possible in macro. Pls suggest me the code.
> >
> > Thnxs,
> > Manish
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts
>



-- 
*Regards*
* *
*Ashish Koul*
*akoul*.*blogspot*.com <http://akoul.blogspot.com/>
*akoul*.wordpress.com <http://akoul.wordpress.com/>
My Linkedin Profile <http://in.linkedin.com/pub/ashish-koul/10/400/830>


P Before printing, think about the environment.

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/pages/discussexcelcom/160307843985936?v=wall&ref=ts

Attachment: testlock.xls
Description: MS-Excel spreadsheet

Reply via email to