Command button to show hidden worksheet

Hi Dominic,

Thank you for replying. So far this is what I have

Private Sub CommandButton4_Click()
    Sheets("Summary 1").Visible = True
    Sheets("Summary 1").Activate
End Sub

but once the user is done with the tab and hits the "Index" button, I want the tab to become hidden again. Do I have to combine that into the formula or do I have to create a new module? I inserted a moduel and I have this

Sub Macro1()
Sheets("Index").Select
    Sheets("Index").Activate
    ActiveWindow.SelectedSheets.Visible = False

But when I hit the "Index" button on the active sheet--it takes me back to the index--however the Summary 1 tab wasnt hidden, it remained visible.

HELPP MEEEEEE

Hi Chioma1975

Next time you post code, please use the code tags (# in the menu above) to mark your code - I have done it for you this time.

Remember, you're working with computers here - you have to be very literal and very specific.
If you want to unhide one sheet and hide another, then that is exactly what you will need to tell Excel to do.
You will also need a new module - linked to a new button - for every sheet you want to use.
Also, always unhide a sheet before you hide the other one - Excel likes to always show at least one sheet and your code will halt if you try and leave Excel (even for a fraction of a second) without at least one sheet visible.

One final word - the macro recorder is great. But it doesn't always create the neatest code. Try tidying your code up as I have shown below. You don't always need to activate an object (in this case, a worksheet) to work with it. The code is very similar to yours but brief. It will make Sheet1 unhidden and hide Sheet2.

Sub test()
Sheets("Sheet1").Visible = True
Sheets("Sheet2").Visible = False
End Sub

HTH

DominicB

Hi Dominic,

Thank you for the advise. It was incredibly helpful in guiding me to the exact code needed. After using the code you provided above, I received an error message once it was applied. I then altered it a bit and ended up with this:

Private Sub CommandButton1_Click()
Sheet17.Select
Sheet4.Visible = False
End Sub

This seemed to do the trick.


Now my next project is to create command buttons that can be used to manipulate pivot tables. Is that even possible?

My hope is: rather than saturate the worksheet with tons of full spectrum data, have the user choose which areas they would like to view either through a command button or a drop down list.

If you are able to help me with this, I would be incredibly grateful. Thanks again for your guidance. This has been an exciting new world of VBA that I look forward to further exploring.