I need to launch the Activate dialog box by using a keyboard shortcut. So I
want a macro that will do the launching, to which I'll assign a shortcut key.

This is the dialog box that you get when you have move than 15 sheets in a
workbook and you right-click on the sheet nagivation buttons to the left of
the workbook's first sheet. The right-click displays a list of the
workbook's first 15 sheets and a More Sheets... option. When you select the
More Sheets option the Activate dialog box pops up, listing all worksheets in
the workbook. From there you select the sheet you want to activate.

I've tried this code line, but the dialog box shows open workBOOKS rather
than workSHEETS.

Application.Dialogs(xlDialogActivate).Show

Can I do what I want to do without creating my own user form / dialog box or
is this seemingly simple problem really a complex problem?

Many thanks.

Application.CommandBars("Workbook Tabs").ShowPopup

Ted M H wrote:

I need to launch the Activate dialog box by using a keyboard shortcut. So I
want a macro that will do the launching, to which I'll assign a shortcut key.

This is the dialog box that you get when you have move than 15 sheets in a
workbook and you right-click on the sheet nagivation buttons to the left of
the workbook's first sheet. The right-click displays a list of the
workbook's first 15 sheets and a More Sheets... option. When you select the
More Sheets option the Activate dialog box pops up, listing all worksheets in
the workbook. From there you select the sheet you want to activate.

I've tried this code line, but the dialog box shows open workBOOKS rather
than workSHEETS.

Application.Dialogs(xlDialogActivate).Show

Can I do what I want to do without creating my own user form / dialog box or
is this seemingly simple problem really a complex problem?

Many thanks.

--

Dave Peterson

Hi Dave,

Thanks a million.

"Dave Peterson" wrote:

Application.CommandBars("Workbook Tabs").ShowPopup

Ted M H wrote:

I need to launch the Activate dialog box by using a keyboard shortcut. So I
want a macro that will do the launching, to which I'll assign a shortcut key.

This is the dialog box that you get when you have move than 15 sheets in a
workbook and you right-click on the sheet nagivation buttons to the left of
the workbook's first sheet. The right-click displays a list of the
workbook's first 15 sheets and a More Sheets... option. When you select the
More Sheets option the Activate dialog box pops up, listing all worksheets in
the workbook. From there you select the sheet you want to activate.

I've tried this code line, but the dialog box shows open workBOOKS rather
than workSHEETS.

Application.Dialogs(xlDialogActivate).Show

Can I do what I want to do without creating my own user form / dialog box or
is this seemingly simple problem really a complex problem?

Many thanks.

--

Dave Peterson