Opening a worksheet with an auto shape button

Hi

I have created a menu on my spreadsheet to open user forms with auto shape buttons which work fine. I have created another auto shape button which i want to open a hidden worksheet. Is this possible and if so how do i go about it.

Any help greatly appreciated

Roy
Once i loaded the code and click on button this error message appears
Compile error
Invalid inside procedure

This is the code i loaded
Sub AutoShape17_Click()
Option Explicit

Sub Trapezoid1_Click()
With Sheet1 '<- change sheet as required
.Visible = xlSheetVisible
.Select
End With
Any ideas