Message Box for range of cells

I got great help from Cheeky Charlie in my last thread - thanks!

In cell E12, I have a drop down list of choices. I am using a code that will display a message box whenever a particular choice is picked from that list.

If Target.Address = "$E$12" Then
Application.DisplayAlerts = False
ActiveSheet.Unprotect
    Select Case Range("E12").Value
        Case "OPTION D": MsgBox ("MESSAGE MESSAGE MESSAGE MESSAGE")
        End Select
ActiveSheet.Protect
Application.DisplayAlerts = True
End If

I'm trying to do the same thing in a large range of cells (L5:O5, L12:O12, L15:O15, L18:O18, L21:O21 and L24:O24). So if someone were to choose OPTION A from cell L5, they'd get a message. If they chose OPTION A from cell M18, they'd get the same message. If the chose OPTION A from cell O21, they'd get the same message. If they chose...well, you get the idea.

My question, is do I have to have a copy of that code for every single cell I want to do this in, or is there a way to make that same code cover the range of cells I specified?

Thanks!



Sorry, forgot to mention that I'm using Office Excel 2003

Maybe like this:

Private Sub Worksheet_Change(ByVal Target As Range)
    With Target
        If .Count > 1 Then Exit Sub
        If Not Intersect(.Cells, Me.Range("L5:O5,L12:O12,L15:O15,L18:O18,L21:O21,L24:O24")) Is Nothing Then
            If UCase(.Value) = "OPTION D" Then MsgBox "whatever"
        End If
    End With
End Sub

It has to go in the appropriate sheet module.

Macros enabled? Tried closing and reopening? If it still doesn't work, post a sanitized workbook.

One in which any sensitive information has been removed.

The code I posted doesn't appear in your workbook.

Sorry, I took it out when it wasn't working. And I guess I uploaded the wrong copy.

But in the meantime, I was playing around with the sheet and here's something I discovered. When I copy your code exactly and change OPTIOND to the actual value I want, the code doesn't work. But if I change one of the values in the range to OPTIOND and leave the code's value as OPTIOND, then the code works. Is there something else I was supposed to change in that code?
-------------------------

EDIT:
I think I figured it out. And I think it's cause I might have thrown you off, and if so, I'm sorry! But if my value is anything in all caps, then it'll work. I just tried doing "OptionD" in my value list and in the code and it failed to execute. But when I changed the code and value in the list to THISVALUE, it worked.
How can I change it so that it'll take something like "J&J Smith"?