Exit Macro if NO is choosen from Msgbox

[Cosmos75]

I have this code.

Dim ws As Worksheet

For Each ws In Sheets
If ws.Name = "Test" Then
ws.Select
Application.DisplayAlerts = False
Message = MsgBox("Delete " & ws.Name & " sheet?", vbYesNo, "ARE YOU SURE ABOUT THIS?")
'Does not require End If statement
If Message = vbYes Then Worksheets(ws.Name).Delete
End If
Next ws

- more code-

End Sub

How do I get it to exit the macro if the use chooses NO instead of YES?

[Mark O'Brien]

If Message = vbYes Then 

Worksheets(ws.Name).Delete 

else

exit sub 'or STOP if you have additional subroutines running

End If 

[Cosmos75]

I am afriad I don't know what you mean by additional sub-routines!

Please excuse my ignorance!

[brettvba]

or
if message = vbno then exit sub