Please edit this macro for me, vbYesNo, thanks

[pedie]

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, "Question")
Else
GoTo skip:
End If
If Responce = vbYes Then
skip:
'
'MY CODE:
Else
MsgBox "Thank you!"
End If
End Sub

 

[VoG]

Perhaps

Sub pedies_vbyesno()
Dim Responce As VbMsgBoxResult
If Sheets("home").Range("C40").Value = "Declined" Then
    Responce = MsgBox("Attention! Staffing Status States 'Declined'," & vbNewLine & "Are you sure you want to update the tracker, if so please Click Yes or No to Discontinue", vbYesNo, "Question")
End If
If Responce = vbYes Then
    'MY CODE:
Else
    MsgBox "Thank you!"
End If
End Sub

 

[pedie]

Thanks Vog, trying it now

 

[pedie]

Oh my madness....sorry

to the current code i want edit it as follows
I just want to add one more thing. Here the pop up only come only when c40 = "Declined"
.
Please add a code so that when there is "Yes" in sheets("Home").range("C41"
) then msgbox "Attention! there is someone already
going for same? To continue click Yes"
So if c40 = declined or if c41 = yes, then pop up msg otherwise directly run my code.
THanks again!

 

[VoG]

Try

Sub pedies_vbyesno()
Dim Responce As VbMsgBoxResult
If Sheets("home").Range("C40").Value = "Declined" Then
    Responce = MsgBox("Attention! Staffing Status States 'Declined'," & vbNewLine & "Are you sure you want to update the tracker, if so please Click Yes or No to Discontinue", vbYesNo, "Question")
Else
    Exit Sub
End If
If Responce = vbYes Then
    'MY CODE:
Else
    MsgBox "Thank you!"
End If
If Sheets("home").Range("C41").Value = "Yes" Then
    Responce = MsgBox("Attention! there is someone already going for same?" & vbNewLine & "To continue click Yes", vbYesNo, "Question")
Else
    Exit Sub
End If
If Responce = vbYes Then
    'MY CODE:
Else
    MsgBox "Thank you!"
End If
End Sub

 

[pedie]

Thanks alot...
Vog, one more question, are you an employeee here?

 

[VoG]

No. I work for a research, testing and consultancy company operating in the UK water supply industry.

 

[pedie]

Okay great! thanks for replying!!!

All the best as you go ahead!!!