Tom,

My typo (the following worked)

If ActiveSheet.Name <> "Sheet1" Then
ActiveSheet.Visible = xlVeryHidden
Sheets("Sheet1").Activate
End If

Change "Sheet1" to actual worksheet name
or use Activesheet.Index <>1
Sheets(1).acitvate

--
steveB

Remove "AYN" from email to respond
"Tom Ogilvy" <twogilvy@msn.com> wrote in message
news:umRgnOGmFHA.2904@TK2MSFTNGP14.phx.gbl...
>? "AAAA" > "Sheet1"
> False
>
> --
> Regards,
> Tom Ogilvy
>
> "STEVE BELL" <AYNrand451@verizon.net> wrote in message
> news:PS8Ie.32788$Tk6.17013@trnddc02...
>> You can incorporate this in the button to return to the main sheet
>>
>> If ActiveSheet.Name > "Sheet1" Then
>> ActiveSheet.Visible = xlVeryHidden
>> Sheets("Sheet1").Activate
>> End If
>>
>>
>> --
>> steveB
>>
>> Remove "AYN" from email to respond
>> "jhahes" <jhahes.1t7cqz_1123096032.2606@excelforum-nospam.com> wrote in
>> message news:jhahes.1t7cqz_1123096032.2606@excelforum-nospam.com...
>> >
>> > Thanks Tom, I like that idea, didn't think of it. However the reason I
>> > want each page to go back to the home page is that I would also put
>> > this code in each command bar code.
>> >
>> > Call Macro ("Sheet1".activate)
>> > Sheet55.visible = xlhidden ' or whatever sheet i am on
>> >
>> > Basically from the main page, a user can go to about 50 or so sheets
>> > and look at the detail of some products, however when done looking I
>> > would like for them to go back to the main page, but it leaves up the
>> > page they just looked at the bottom, and pretty soon I have 25 or so
>> > sheets open. I understand that I can hide all of them on Workbook_Open
>> > or close.
>> >
>> > Is there a better solution to this
>> >
>> > Thanks for any help
>> >
>> >
>> > --
>> > jhahes
>> > ------------------------------------------------------------------------
>> > jhahes's Profile:
>> > http://www.excelforum.com/member.php...o&userid=23596
>> > View this thread:
> http://www.excelforum.com/showthread...hreadid=392594
>> >
>>
>>
>
>