engbe
Sun May 11 23:14:01 CDT 2008
THANK YOU THANK YOU THANK YOU to the both of you!!! Both of you don't know
how much i appreciate this...and an extra THANK YOU to JLatham for taking the
time to actually create it in a work book and answering yet another one of my
questions : )
"JLatham" wrote:
> I took much the same, straightforward route that FSt1 took. I used Command
> Buttons from the "Forms" toolbar rather than from the Controls toolbar, and
> I've put some code in both the Workbook_Open() event and the 'main menu'
> (3-button) sheet's Worksheet_Activate() code to save some lines of code
> elsewhere. You can examine the workbook itself by downloading it from here:
>
http://www.jlathamsite.com/uploads/for_engbe.xls
>
>
>
> "FSt1" wrote:
>
> > hi,
> > very possible. i didn't write in all so you will have to do some creating on
> > you own, i am just showing you have to get started.
> > hide all sheets except 1 when you save and close the file. that way only one
> > sheet will be showing at open.
> > drop a command button on the sheet and put this code in it. it will unhide
> > the first five sheets and activate(select) sheet2. change if you want. this
> > same code can be use for your other 2 buttons except different sheet names.
> > Private Sub CommandButton1_Click()
> > Sheets("Sheet2").Visible = True
> > Sheets("Sheet3").Visible = True
> > Sheets("Sheet4").Visible = True
> > Sheets("Sheet5").Visible = True
> > Sheets("Sheet2").Activate
> > End Sub
> >
> > code to return to sheet1 and rehide sheets 2-5... this code can be use for
> > all the other return/rehide buttons except... again... different sheet names.
> > Private Sub CommandButton2_Click()
> > Sheets("sheet1").Activate
> > Sheets("Sheet2").Visible = False
> > Sheets("Sheet3").Visible = False
> > Sheets("Sheet4").Visible = False
> > Sheets("Sheet5").Visible = False
> > End Sub
> >
> > hope this helps.
> >
> > Regards
> > FSt1
> >
> > "engbe" wrote:
> >
> > > Hi Does any have any ideas on how to create a macro for this or if this is
> > > possible?
> > >
> > > - I want to have 1 workbook with about 13 spreadsheets in it.
> > > - When I open the workbook I only want to see "sheet 1" (with the other 12
> > > spreadsheets hidden)
> > > - On sheet 1 i want to have 3 buttons, 1. Commodities 2. Forex 3. Options
> > > - When I click on the 'Commodities' button, I want spreadsheets 2,3,4 & 5 to
> > > show/be unhidden
> > > - I also want there to be a button on spreadsheet 2,3,4,&5 to say 'Back to
> > > Spreadsheet 1' and when clicked will navigate back to spreadsheet 1 and
> > > spreadsheets 2,3,4 & 5 hidden again (like when i first open the workbook)
> > > - When i click on the 'Forex' button, I want spreadsheet 6,7,8 & 9 to be
> > > shown/unhidden
> > > - I also want there to be a button on spreadsheet 6,7,8 & 9 to say 'Back to
> > > Spreadsheet 1' and when clicked will navigate back to spreadsheet 1 and
> > > spreadsheets 6,7,8 & 9 hidden again (like when i first open the workbook)
> > > - When i click on the 'Options' button, I want spreadsheet 10,11 & 12 to be
> > > shown/unhidden
> > > - I also want there to be a button on spreadsheet 10,11 & 12to say 'Back to
> > > Spreadsheet 1' and when clicked will navigate back to spreadsheet 1 and
> > > spreadsheets 10,11 & 12hidden again (like when i first open the workbook)
> > >
> > > I'm not sure if what i want to do is even possible and would really
> > > appreciate any help on how to do this or on a better way to do this.
> > >
> > > Many thanks in advance!