Worksheet_Change issue

[daveymossman]

I'm a bit of a novice. I have a drop down cell which I have named "Deal Status". Whenever that cell is changed, I want a macro to run to potentially hide/unhide sheets depending on the selection. When "Executed LOI Received" is selected, the sheets are remaining hidden (I want them unhidden for that value). Currently I have written:

Private Sub Worksheet_Change(ByVal Target As Range)


If Target.Address = Range("DealStatus").Address Then
If Range("DealStatus").Value = "Executed LOI Received" Then
Sheets("Loan Writeup").Visible = True
Sheets("CMHC Checklist").Visible = True
Sheets("Funder Checklist").Visible = True
Sheets("CMHC Form 530B").Visible = True

Else
Sheets("Loan Writeup").Visible = False
Sheets("CMHC Checklist").Visible = False
Sheets("Funder Checklist").Visible = False
Sheets("CMHC Form 530B").Visible = False
End If

End If


End Sub



Any ideas on what I'm doing incorrectly?

 

[Smitty]

Welcome to the Board!

I'd probably just remove the first If statement and use:

If Target.Value = "Executed LOI Received" Then

HTH,

 

[daveymossman]

Welcome to the Board!

I'd probably just remove the first If statement and use:

If Target.Value = "Executed LOI Received" Then

HTH,

Great - thanks.