I agree with you--but if Bea wanted a button...

But you are a poet!

> But, that's me, not Bea.

Gord Dibben wrote:
>
> I find it just as easy to drag the Custom Views drop-down to a Toolbar and
> select a view from there.
>
> But, that's me, not Bea.
>
> Gord
>
> On Tue, 29 Nov 2005 17:24:03 -0600, Dave Peterson <petersod@verizonXSPAM.net>
> wrote:
>
> >Ah, but your suggestion also works if Bea wants to set up the workbook the way
> >Bea wants and then use a button to show that view.
> >
> >It might be a combination solution that works best for Bea.
> >
> >Gord Dibben wrote:
> >>
> >> Dave
> >>
> >> My custom views suggestion was only if Bea didn't want to use macros.
> >>
> >> If using macros, better off to go with the toggle macro you first posted.
> >>
> >> Gord Dibben Excel MVP
> >>
> >> On Tue, 29 Nov 2005 16:55:36 -0600, Dave Peterson <petersod@verizonXSPAM.net>
> >> wrote:
> >>
> >> >Sometimes you can just record a macro while you do it manually.
> >> >
> >> >I got this when I showed the view named Test1.
> >> >
> >> >Option Explicit
> >> >Sub Macro1()
> >> > ActiveWorkbook.CustomViews("test1").Show
> >> >End Sub
> >> >
> >> >
> >> >Behind a commandbutton from the control toolbox toolbar:
> >> >
> >> >Option Explicit
> >> >Private Sub CommandButton1_Click()
> >> > Me.Parent.CustomViews("test1").Show
> >> >End Sub
> >> >
> >> >Me is the worksheet that owns the code (and button). Me.Parent is the workbook.
> >> >
> >> >Bea wrote:
> >> >>
> >> >> Gord - Thanks for your help. Can you use a button with the Custom Views? I
> >> >> could not figure that one out.
> >> >>
> >> >> "Gord Dibben" wrote:
> >> >>
> >> >> > Bea
> >> >> >
> >> >> > There is also Views>Custom Views if you don't want to go the macro route.
> >> >> >
> >> >> >
> >> >> > Gord Dibben Excel MVP
> >> >> >
> >> >> > On Tue, 29 Nov 2005 13:18:06 -0800, Bea <Bea@discussions.microsoft.com> wrote:
> >> >> >
> >> >> > >This was perfect Dave! Thank you so much!
> >> >> > >
> >> >> > >"Dave Peterson" wrote:
> >> >> > >
> >> >> > >> You could put a button from the control toolbox toolbar on that worksheet.
> >> >> > >> Double click on that button and you'll see where the code goes.
> >> >> > >>
> >> >> > >> Paste this in that window and end up with something that looks like this.
> >> >> > >>
> >> >> > >> Option Explicit
> >> >> > >> Private Sub CommandButton1_Click()
> >> >> > >> Dim myRng As Range
> >> >> > >>
> >> >> > >> Set myRng = Me.Range("a3:a5,a7:a19,a22:a33")
> >> >> > >>
> >> >> > >> myRng.EntireRow.Hidden = Not (myRng(1).EntireRow.Hidden)
> >> >> > >>
> >> >> > >> End Sub
> >> >> > >>
> >> >> > >> Adjust the range you want to hide/show
> >> >> > >>
> >> >> > >> If you're new to macros, you may want to read David McRitchie's intro at:
> >> >> > >> http://www.mvps.org/dmcritchie/excel/getstarted.htm
> >> >> > >>
> >> >> > >>
> >> >> > >> Bea wrote:
> >> >> > >> >
> >> >> > >> > I want to group rows together and have a quick expand/collapse button on the
> >> >> > >> > sheet itself. I see the group/outline function but do not like the display of
> >> >> > >> > the expand/collapse in the left side of the rows.
> >> >> > >>
> >> >> > >> --
> >> >> > >>
> >> >> > >> Dave Peterson
> >> >> > >>
> >> >> >
> >> >> >

--

Dave Peterson