VBA code for message box (pop-up)

[jgopalk]

Hi,

I have few cells where "Yes" or "No" to be selected from drop down. When the selection is "Yes" I need message box to pop-up. Likewise there are around 7 cells with 7 different message to pop-up in message box.

E.g.,

A1 = Yes "Msg 1"
A2 = Yes "Msg 2"

Likewise for 7 cells. If "NO" no pop-up is required.

Please let me know how to include all 7 cells in this code (with 7 different messages).

Thanks

 

[Joe4]

Right-click on the sheet tab name at the bottom of the screen, select "View Code", and paste this code in the resulting VB Editor window:

Private Sub Worksheet_Change(ByVal Target As Range)

    If Target.Count > 1 Then Exit Sub
    
    Select Case Target.Address(0, 0)
        Case "A1"
            If Target = "Yes" Then MsgBox "You updated cell A1"
        Case "A2"
            If Target = "Yes" Then MsgBox "You updated cell A2"
        Case "A3"
            If Target = "Yes" Then MsgBox "You updated cell A3"
        Case "A4"
            If Target = "Yes" Then MsgBox "You updated cell A4"
        Case "A5"
            If Target = "Yes" Then MsgBox "You updated cell A5"
        Case "A6"
            If Target = "Yes" Then MsgBox "You updated cell A6"
        Case "A7"
            If Target = "Yes" Then MsgBox "You updated cell A7"
    End Select

End Sub

Change your messages to your liking.

 

[jgopalk]

Hi Joe.. this just worked like a piece of cake...
Thanks a lot..

 

[Joe4]

You are welcome.
Glad I was able to help!