Sub hide_sheets()
Dim a As String
a = ActiveSheet.Name
Sheets(ActiveSheet.Shapes(Application.Caller).TextFrame.Characters.Text).Activate
Sheets(a).Visible = False
End Sub
On Tue, Aug 23, 2011 at 6:31 PM, Prakash Paul wrote:
> Hi Prasad,
>
> Try this attached file.
>
> Regards
> Prakash Pau
Hi Rajan,
Thanks for the Macro, but i need somethig like this :
I have 5 TAB's in the first TAB named with Sheet1 i have Control as Sheet2
the point here is once i work on my sheet1 then i need to go to Sheet2 so i
have placed a control as sheet2 (something like hyperlink)and once i click
on shee
