msgbox coding

[Junior]

how can i modify the following to have the 'No' button in the messagebox as
the default button?

intAns = MsgBox("Are you finished?" _
, vbYesNo + vbQuestion, " Reminder")
If intAns = vbYes Then

 

[Jeff Conrad]

Try:

intAns = MsgBox("Are you finished?" _
, vbYesNo + vbQuestion + vbDefaultButton2, " Reminder")
If intAns = vbYes Then

 

[Junior]

Jeff thanks

Try:

intAns = MsgBox("Are you finished?" _
, vbYesNo + vbQuestion + vbDefaultButton2, " Reminder")
If intAns = vbYes Then

 

[Jeff Conrad]

You're welcome, glad to help.