locking/protecting specific range

[union]

hello everyone,

i have written the folllowing code:

Sub ppppppppppppp()

Worksheets("sheet1").Range("a4:a20").Locked = True
ActiveSheet.Protect Password:="enter your password"



End Sub

i just want to be able to lock the specific range e.g. [Range("a4:a20")], but instead it is protecting/locking the whole worksheet. can someone help/explain to me why it won't let me lock my specific cells/range? thanks

[Kaper]

Hi,
1) is your activesheet Sheet1? if not you shall do both (locking cells and protecting sheet) on the same sheet
2) are other cells unlocked? if not correct it
3) important note: please use code tags as required by our forum rules (edit your post). see http://www.excelforum.com/forum-rule...rum-rules.html

Please Login or Register  to view this content.