;):)mY current code is:
sub pedies_vbyesno()
Dim Responce As VbMsgBoxResult
If Sheets("home").Range("C40").Value = "Declined" Then
Responce = MsgBox("Attention! Staffing Status States 'Declined', are you sure you want to update the tracker, if so please Click Yes or No to Discontinue", vbYesNo...