Protect cells at different intervals and allow to select certain range

[marreco]

When I need to run my macro ...

I need to protect the line 'A1: M1' (but NOT the cells might be selected).

I need to protect and range 'A2: M65536' (however this interval I have to select the cells to be able to copy them).

Thank you!!

[CatDaddy]

ActiveSheet.Unprotect
Range("A1:M" & Rows.Count).Locked = True
ActiveSheet.protect Contents:=True

[marreco]

Hi
Thanks for replying but where do I put the code?
Private Sub txtData_Change()
ActiveSheet.Unprotect "123" '<--CatDaddy, I would have to replace this line for its macro
If Txtdata.Text <> "" And IsDate(Txtdata.Text) And IsDate(TxtAte.Text) Then
Selection.AutoFilter Field:=7, Criteria1:=">=" & Format(Txtdata.Text, "mm/dd/yyyy"), Operator:=xlAnd, Criteria2:="<=" & Format(TxtAte.Text, "mm/dd/yyyy")
Else
Selection.AutoFilter Field:=7
End If
ActiveSheet.Protect "123" '<--CatDaddy, I would have to replace this line for its macro
End SubThank you!!!

[CatDaddy]

Private Sub txtData_Change()
ActiveSheet.Unprotect "123" '<--CatDaddy, I would have to replace this line for its macro
If Txtdata.Text <> "" And IsDate(Txtdata.Text) And IsDate(TxtAte.Text) Then
Selection.AutoFilter Field:=7, Criteria1:=">=" & Format(Txtdata.Text, "mm/dd/yyyy"), Operator:=xlAnd, Criteria2:="<=" & Format(TxtAte.Text, "mm/dd/yyyy")
Else
Selection.AutoFilter Field:=7
End If
Range("A1:M" & Rows.Count).Locked = True
ActiveSheet.Protect "123" '<--CatDaddy, I would have to replace this line for its macro
End Sub

[marreco]

Hi.
I need to make a note of course I had not mentioned!

I need to line 1 ("A1: M1") and Column 'L' totaalmente be blocked (NOT allow select cells or range).

Now 'A2: M65536' allow copying and celecionar céluals or range.

Can you help me with this my code posted above?

Thank you!!

[marreco]

Hi.

Any idea?

thank you!!

[CatDaddy]

I dont know as far as I can tell you are looking for the EnableSelection property but it seems like you can only make it so either all of the locked cells cannot be selected or all of them can, and you are looking to lock multiple cells but only block a few from selection correct? hopefully someone else has seen this before

[marreco]

Hi.
I thought there was an option to completely block a range.:(

while another range, i could select feathers, and not change the data ..

thank you!