Go To a Special Page

[hoomantt]

Hi Dear Professors
i need a macro for assign to a shape that when user run this code , user go to page that named in cell g1 in sheet H .
that cell ( cell G1 in sheet H) connect to a combobox .
there for i want when use that combobox with a shape near it i can go to that page .(in combo box there are several sheet names in this workbook)

 

[Debraj]

Hi hooman!

Do you think.. your explanation is enough to understand for anyone..

Try again..

 

[bobhc]

Go to Special Page, go to a cell, run a macro, hyperlink a cell, shape next to combo box that appears to be not needed other than to look pretty..... just how much information do you need Deb......


.

 

[pakilprogramador]

the best is attached an example.

warm regards,

 

[bobhc]

the best is attached an example.

more of less of example, where is the upload

 

[hoomantt]

Hi Dear Professors
i explain
i have a workbook . i made a combobox in a worksheet. in this combobox i have the name of some worksheets .
i want a code for : when i select a data from combobox i can touch a shape to go to that page.

 

[Deepak]

Hi Dear Professors
.....when i select a data from combobox i can touch a shape to go to that page.

I think you are looking for this!!!

Private Sub CommandButton1_Click()
Dim s As String
If Me.ListBox1.ListIndex < 0 Then
    MsgBox "Pls select the Sheet Name."
    Exit Sub
End If
s = Me.ListBox1.Value
Unload Me
Sheets(s).Visible = -1
Sheets(s).Activate
End Sub

I f it didn't help then you must to upload a sample file with desired output as already advised.

 

[pakilprogramador]

maybe something like that is what you want.

warm regards.

 

[pakilprogramador]

other example ..

 

[hoomantt]

Thanks alot
thank you so much dear friends
thank you