Option boxes..

[Ste_Moore01]

Hi guys,

I'm trying to create a box that is similar to a msgbox but instead of there being just one button (the "OK" button) I want there to be 2 buttons and each button does something different.

Is there a way of doing this as I'm not sure how to do it.

I would like the text in the box to say, "Do you wish to Print this pricepack?" and the buttons to say "Yes" and "No".

The "Yes" button would run the macro "Pricepack" and the "No" button would run the macro "Pricepack1".

 

[Andrew Poulsom]

Example:

Sub Test()
    Dim Ans As Variant
    Ans = MsgBox("Do you wish to Print this pricepack?", vbYesNo)
    If Ans = vbYes Then
'       Your code
    Else
'       Your code
    End If
End Sub

 

[staticbob]

Try this...

If MsgBox("Do you want to Print ?", vbYesNo, "Printing") = vbYes Then
    'Run This code
Else
    'Run this code
End If

Bob

 

[Ste_Moore01]

Thank you so very much!

This has helped me out a lot!