Macro for Dialog Box with buttons that select a worksheet...

Todd K · Feb 25th, 2002, 08:55 AM

I want to know if anyone can suggest an approach to a macro that will generate a dialog box, on opening a workbook, that will present a series of buttons (radio, 3D, whatever) that are linked to worksheets, such that when the buttons are activated, the user is taken to an appropriate worksheet?

GeorgeAdamson · Feb 25th, 2002, 09:16 AM

I'll assume you're using VBA and know a wee bit about macros...

To create a form, go to the VB Editor in Excel using Alt+F11. Right-click on the Project pane and choose Insert...UserForm. Add buttons to the form. Double-click a button and type Sheets("Sheet2").Select replacing Sheet2 with the name of whatever sheet you want to activate.

To make the for run when you open the spreadsheet, add the following code to Module1

Public Sub Auto_Open()
UserForm1.Show
End Sub

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Feb 25th, 2002, 08:55 AM	#1
Todd K New Member Join Date: Feb 2002 Posts: 31	I want to know if anyone can suggest an approach to a macro that will generate a dialog box, on opening a workbook, that will present a series of buttons (radio, 3D, whatever) that are linked to worksheets, such that when the buttons are activated, the user is taken to an appropriate worksheet?

Feb 25th, 2002, 09:16 AM	#2
GeorgeAdamson New Member Join Date: Feb 2002 Posts: 14	I'll assume you're using VBA and know a wee bit about macros... To create a form, go to the VB Editor in Excel using Alt+F11. Right-click on the Project pane and choose Insert...UserForm. Add buttons to the form. Double-click a button and type Sheets("Sheet2").Select replacing Sheet2 with the name of whatever sheet you want to activate. To make the for run when you open the spreadsheet, add the following code to Module1 Public Sub Auto_Open() UserForm1.Show End Sub