Msgbox based on cell value/text

[donny1shot]

Hi simple one I think.

I am trying to have a pop up msgbox appear if a cells value = yes.

any help please.

 

[louisH]

Hi

If Range("A1").Value = "yes" Then MsgBox Prompt:="Top of da morning to ya", Title:="The Title"

Replace with what is needed.

Careful, this is case sensitive. "yes" =/= "Yes"

 

[donny1shot]

thanks that one works great!

Hi

If Range("A1").Value = "yes" Then MsgBox Prompt:="Top of da morning to ya", Title:="The Title"

Replace with what is needed.

Careful, this is case sensitive. "yes" =/= "Yes"

also I am tray on another sheet a similar action (see code below)

Private Sub UserForm_activiate()
If Sheets("HCR").Range("C13").Text = "Yes" Then
    UserForm1.Show
    End If
End Sub

This isn't working for me I need the userform to show if YES is selected in that cell

 

[louisH]

Can you tell me what error message you are getting and at which line ?