Autolocking a table

Question

Hi All,I am autolocking a cell when typing a value in the cell, But when i am doing this the table sometimes in my workbook is not expanding, Can anyone help me for the same. For more please refer to the attached workbook. Let me know in case of any confusionsThanks

nikolinode · Answer

yugal40&nbsp;&nbsp;Untested ... hope it works :))&nbsp;Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Unprotect Password:="xyz"
Target.Locked = True
With ActiveSheet
    .Protect userinterfaceonly:=True, Password:="xyz", AllowInsertingColumns:=True, AllowInsertingRows:=True
.EnableOutlining = True
.EnableAutoFilter = True
End With
End Sub&nbsp;&nbsp;

yugal40 · Answer

NikolinoDE&nbsp;Thanks for your reply.But its not working, Please refer to the attached workbook

nikolinode · Answer

yugal40Hope I was able to help you with these sample files 🙂.&nbsp;NikolinoDEI know I don't know anything (Socrates)&nbsp;

yugal40 · Answer

NikolinoDE&nbsp;Thanks again for helping me,The concern here is i want tonly freshly cells to be auto locked and in the attached workbook when i added C6 and C7 cell it worked, But after that it didn't worked for cell C8Can you please check if the same is happening with you as well?I am using Office 365 with windows, Not sure if that mattersThanks

nikolinode · Answer

yugal40&nbsp;So it works for me. If I enter a value in cell, it locks immediately afterwards. &nbsp;Maybe another user can try it here in the forum and give us feedback? Tried with another Excel / Pc? In the end maybe update everything and do an office repair.&nbsp;*I tested the file with Excel 2016.&nbsp;Hope I was able to help you with this info.

Forum Discussion

Autolocking a table

9 Replies

Resources