Unlock cell in E based on value in Col D. HOW?

[Mister H]

Hi:

I need to get a peice of code that will look on a sheet titled:

Estreated (INFO)

in a range named:

IFIS_Status (D3:D27)

IF the cell value in D3 is: To be entered in IFIS by MAG then unlock cell E3 otherwise keep cell E3 locked.

Then check cell D4 etc...

Any suggestions? I had played around a bit with a change event but it doesn't really work that well as the sheet containing the named range is being populated via formulas.

Any suggestions?

THANKS,
Mark

 

[Mister H]

In case it matters I had tried this but like I say it doesn't work when the sheet gets auto poppulated

HOPEFULLY someone can suggest a code for me.

Private Sub Worksheet_Change(ByVal Target As Range)
'''''''''''''''''''''''''''''''''''''''''''''''''''''''
'Unlocks Cells Based on Input on Input Sheet Column D
Application.ScreenUpdating = False
    If Target.Count > 1 Then Exit Sub
    If Target.Row < 2 Then Exit Sub
    If Target.Column <> 4 Then Exit Sub
    
    ActiveSheet.Unprotect
    
Select Case Target
   
Case "To be entered in IFIS by MAG"
      Target.Offset(0, 1).Locked = False
     
     
Case "Entered in IFIS by NTRMB"
     Target.Offset(0, 1).Locked = False
     
End Select
    ActiveSheet.Protect
End Sub

THANKS,
Take Care,
Mark

 

[baitmaster]

You could try using the Worksheet_Calculate() event instead

If the code works for you, the issue is about how to trigger it. You might also try that worksheet_activate, or a workbook-level event instead

 

[Mister H]

THANKS for the input baitmaster.

I will try your suggestions out. I have never used those events before but I will see how (if) they work.

TANKS Again,
Mark