Maessage message with Yes No Prompt

[howard]

I have written code for a message box prompt to allow the user to select Yes to continue or No to Exit sub

Where I select No, macro does not exit

Sub MessageRangeValues()
Dim response
response = MsgBox("Has the macro been selected to range Value the data?", vbYesNo)
If response = vbNo Then
Exit Sub
Else
End If
End Sub [code]


It would be appreciated if someone could amend my code

 

[jolivanes]

Both give the desired result.

Sub MessageRangeValues()
Dim response
response = MsgBox("Has the macro been selected to range Value the data?", vbYesNo)
    If response = vbNo Then
        Exit Sub
            Else
        MsgBox "Hello"
    End If
End Sub

Sub MessageRangeValues_2()
If MsgBox("Has the macro been selected to range Value the data?", vbYesNo) = vbNo Then Exit Sub
MsgBox "Hello"
End Sub

 

[howard]

Many thanks for the help