Intersect, Target code does not work on protected sheet

[mdd16]

Hello,

I have encountered a problem that has made me very disappointed at end of a huge project.

I have created intersect, target code for changing in-cell drop down lists for Data validation. I am changing contents of drop down list based on the prior cell value. It has been working like a charm on my computer. However for handing out file copies to others, I need to password protect the sheet.

When I am putting password protection on the sheet the intersect, target procedures, which I have written for the sheet stop working..

Have I reached end of the road .. or there is a way to solve this..


thanks for your attention.. Any help will be appreciated very much..

 

[mdd16]

Following up, it looks like the code is looping because you haven't disabled events, although I'm not entirely sure why it it is behaving differently when the sheet is protected.

Making this minor edit to the code to prevent it from looping when the adjacent columns are cleared appears to work correctly, although there may be other problems that I have not found.
You will still need the lines to unprotect at the start and reprotect at the end.

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False

    ' rest of code goes here

Application.EnableEvents = True
End Sub

 

[mdd16]

I works like charm. Can't thank you enough for saving the day for me.. You guys are like excel magicians..
Thank you ??