I would like to include a message box to my macro that prompts user to select
one of two options, or to CANCEL. I know you can create an Answer Box that
provides a Y/N/Cancel option, but I really don't want to use "YES" or "NO".
For example, I'd like the message to say "Would you like to copy your data to
SHEET1 or SHEET2?" Then have buttons labeled SHEET1 / SHEET2 /CANCEL
(instead of YES / NO / CANCEL). Can this be done?

You need to create a userform to do what you want. Then on your userform put
a listbox with sheetnames and then the user could select the sheetname from
the listbox and hit ok.

"jday" wrote:

> I would like to include a message box to my macro that prompts user to select
> one of two options, or to CANCEL. I know you can create an Answer Box that
> provides a Y/N/Cancel option, but I really don't want to use "YES" or "NO".
> For example, I'd like the message to say "Would you like to copy your data to
> SHEET1 or SHEET2?" Then have buttons labeled SHEET1 / SHEET2 /CANCEL
> (instead of YES / NO / CANCEL). Can this be done?

MsgBox(prompt[, buttons] [, title] [, helpfile, context])

In buttons you can use VbYesNoCancel
if user select:
yes msgbox return vbYes (=6),
no msgbox return vbNo (=7),
cancel msgnox return vbCancel (=2).

Ste'

Or, for the three options the OP asked about, he could use three
CommandButtons in place of the ListBox.

--
Rick (MVP - Excel)



"Mike" <(E-Mail Removed)> wrote in message
news:8B443C2D-E527-413D-88E4-(E-Mail Removed)...
> You need to create a userform to do what you want. Then on your userform
> put
> a listbox with sheetnames and then the user could select the sheetname
> from
> the listbox and hit ok.
>
> "jday" wrote:
>
>> I would like to include a message box to my macro that prompts user to
>> select
>> one of two options, or to CANCEL. I know you can create an Answer Box
>> that
>> provides a Y/N/Cancel option, but I really don't want to use "YES" or
>> "NO".
>> For example, I'd like the message to say "Would you like to copy your
>> data to
>> SHEET1 or SHEET2?" Then have buttons labeled SHEET1 / SHEET2 /CANCEL
>> (instead of YES / NO / CANCEL). Can this be done?

Create a User Form and put whatever buttons you want on it. I put together
a very simple example. I put it at http://sample/sample.xls

On Mon, 24 May 2010 08:53:01 -0700, jday <(E-Mail Removed)>
wrote:

>I would like to include a message box to my macro that prompts user to select
>one of two options, or to CANCEL. I know you can create an Answer Box that
>provides a Y/N/Cancel option, but I really don't want to use "YES" or "NO".
>For example, I'd like the message to say "Would you like to copy your data to
>SHEET1 or SHEET2?" Then have buttons labeled SHEET1 / SHEET2 /CANCEL
>(instead of YES / NO / CANCEL). Can this be done?

Your right. I was giving another option. So that maybe in the future the user
would like to paste to worksheet 3 or 4 or 5 ect... the user would not have
to modify the userform.

"Rick Rothstein" wrote:

> Or, for the three options the OP asked about, he could use three
> CommandButtons in place of the ListBox.
>
> --
> Rick (MVP - Excel)
>
>
>
> "Mike" <(E-Mail Removed)> wrote in message
> news:8B443C2D-E527-413D-88E4-(E-Mail Removed)...
> > You need to create a userform to do what you want. Then on your userform
> > put
> > a listbox with sheetnames and then the user could select the sheetname
> > from
> > the listbox and hit ok.
> >
> > "jday" wrote:
> >
> >> I would like to include a message box to my macro that prompts user to
> >> select
> >> one of two options, or to CANCEL. I know you can create an Answer Box
> >> that
> >> provides a Y/N/Cancel option, but I really don't want to use "YES" or
> >> "NO".
> >> For example, I'd like the message to say "Would you like to copy your
> >> data to
> >> SHEET1 or SHEET2?" Then have buttons labeled SHEET1 / SHEET2 /CANCEL
> >> (instead of YES / NO / CANCEL). Can this be done?
>
> .
>

On 24 Mag, 18:01, SteAXA <Ste...@discussions.microsoft.com> wrote:
> MsgBox(prompt[, buttons] [, title] [, helpfile, context])
>
> In buttons you can use VbYesNoCancel
> if user select:
> yes msgbox return vbYes (=6),
> no msgbox return vbNo (=7),
> cancel msgnox return vbCancel (=2).
>
> Ste'

Like this ?

Dim reply As VbMsgBoxResult
reply = MsgBox("Yes = Copy data in Sheet1" & _
vbNewLine & _
"No = Copy data in Sheet2" & _
vbNewLine & _
" otherwise Cancel", _
vbYesNoCancel)

Ciao
:-8)