xlDialogActivate to Select Sheets?

P

PDX

Is it possible to call the Sheet Dialog box (I think
xlDialogActivate) from VBA and allow the scrolling and
selection of sheets?

When I run Application.Dialogs(xlDialogActivate).Show it
show "open" files, I wished it to show Tabs similar to
when you right click on the "Tab Scroll Buttons"?

Thanks
 
D

Dave Peterson

From Jim Rech:

Sub aa()
On Error Resume Next
Err = 0
CommandBars("Workbook Tabs").Controls("More sheets...").Execute
If Err <> 0 Then CommandBars("Workbook Tabs").ShowPopup
End Sub
 
Top