xltrader100
09-17-2008, 05:02 PM
I'm using the following to load a listbox with the names of all the hidden sheets.
ListBox1.CLEAR
With ActiveWorkbook
For i = 1 To .Sheets.Count
If .Sheets(i).Visible = False Then
ListBox1.AddItem (.Sheets(i).Name)
End If
Next
End With
This is working fine except it's giving me the sheet Code names and I want the Tab names. How to convert the Code names to Tab names
ListBox1.CLEAR
With ActiveWorkbook
For i = 1 To .Sheets.Count
If .Sheets(i).Visible = False Then
ListBox1.AddItem (.Sheets(i).Name)
End If
Next
End With
This is working fine except it's giving me the sheet Code names and I want the Tab names. How to convert the Code names to Tab names