How to get Sheet list?

[bhandari]

i am getting error,can i get some help here.how to collect the worksheet names in listbox by using macro?

i have around 20 sheets..i am planning to add few more sheets instead of finding all the sheets i want to find it through list box..

by using command buttons and listbox.

 

[FormR]

Hi, welcome to the board!

Did you know that if you right click the sheet navigation arrows immediately to the left of the sheet tabs then you get a list box with all the sheets in your workbook from which you can activate any.

 

[My Aswer Is This]

Try this:

Private Sub CommandButton1_Click()
Dim i As Long
ListBox1.Clear
    For i = 1 To Sheets.Count
        ListBox1.AddItem Sheets(i).Name
    Next
End Sub

Put this code in your Activex command button. It will put a list of all your sheet names in ListBox1

 

[bhandari]

Try this:

Private Sub CommandButton1_Click()
Dim i As Long
ListBox1.Clear
    For i = 1 To Sheets.Count
        ListBox1.AddItem Sheets(i).Name
    Next
End Sub

Put this code in your Activex command button. It will put a list of all your sheet names in ListBox1

i am trying to get like this
Please find the attachment
https://drive.google.com/open?id=0B-ZWlAv5DqaER3JkTk9rRTMwYUk

 

[My Aswer Is This]

I gave you my answer did this not work for you. If not please give more details. I never click on links.

i am trying to get like this
Please find the attachment
https://drive.google.com/open?id=0B-ZWlAv5DqaER3JkTk9rRTMwYUk

 

[bhandari]

@My Aswer Is This hey iam getting sheet names in list box..

i was looking if i doubleclick that sheet name in listbox i must go to that page is it possible?

 

[My Aswer Is This]

Put this script in the ListBox:

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Sheets(ListBox1.Value).Activate
End Sub

@My Aswer Is This hey iam getting sheet names in list box..

i was looking if i doubleclick that sheet name in listbox i must go to that page is it possible?

 

[FormR]

i was looking if i doubleclick that sheet name in listbox i must go to that page is it possible?

Hi - just in case it got missed, this is built in functionality as described in post#2

 

[bhandari]

it is working fine i have pleanty of sheets so i am expecting scrolling button to my list box how to do that?
is it possible to add scroll button?

 

[My Aswer Is This]

Activex Listbox has scrollbars. Or use up down arrows.

it is working fine i have pleanty of sheets so i am expecting scrolling button to my list box how to do that?
is it possible to add scroll button?