title: Pop-Up a message box when a Cell Value is changed
body: <p>I have an excel sheet where a column has a list validation.</p>
  
  <p>When a particular entry from the list is selected, i need a message box to be popped up.</p>
  
  <p>I could have used the following code if there was only 1 cell, but in my case i have many cells in a column</p>
  
  <pre><code>Private Sub Worksheet_Change(ByVal Target As Excel.Range)    
      Dim rng As Range
         Set rng = Range("A1")
         If Not Intersect(Target, rng) Is Nothing Then
             If rng = "hi" Then
                 MsgBox "Cell " &amp; _
                 rng.Address &amp; " = hi"
             End If
         End If
         Set rng = Nothing
  End Sub
  </code></pre>
  
  <p>Please help</p>