Action dependent on Messagebox response

[singlgl1]

I have a message box set to appear if cell N52 is > zero and cell P14 < zero.
I'd like to ammend it so that if "No" is selected, the messagebox will simply go away, and if "Yes" is selected,the active cell will become P14.
Make sense?
Thanks in advance!

 

[Smitty]

It's pretty straightforward:

    Dim ans As String
    
    ans = MsgBox("Message", vbYesNo)
    
    If ans = vbYes Then Range("P14").Select

HTH,